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Un día en las Un sencillo programa 

para repasar 

carreras conceptos 




El BASIC no es más que un lenguaje desuñado a facilitar fa comunicación, desde 
luego , su diferencia respecto a los lenguajes humanos reside en que su objetivo es 
permitir et diálogo con las máquinas programadles: ios ordenadores 
Su práctica puede resultar amena , e incluso divertida, tomando como elemento de 
ejercicio la confección de un programa de tipo lúdico. 



nielaremos nues- 
tra andadura por 
este segundo 
tomo dedicado al 
lenguaje BASIC 
proponiendo la realización de un peque- 
ño programa que sirva para afianzar los 
tópicos tratados en el volumen anterior. 

Se trata de elaborar un programa de 
apuestas hípicas. Las galopadas de los 
caballos de carreras estarán presentes 
en el «hipódromo de ia pantalla», lo- 
grando así una completa ambientación. 

El caballo ganador de la contienda se 
dejará a elección del azar. De esta for- 
ma, el resultado será totalmente impre- 
visible para el apostante. Este podrá, si 
tiene suerte, hacerse millonario (imagi- 
nariamente, claro), o bien sumirse en la 
más deplorable de las ruinas. 

Para ír calentando «grupas», se co- 
menzará con el diseño del cartel de en- 
trada, Este servirá, además, para dar a 
conocer las reglas del juego. Su confec- 
ción no tiene mayor dificultad que la de 
tratar de darle una presentación atrac- 
tiva y, por ende, más eficaz. Este cartel 
de entrada puede realizarse por medio 
de la siguiente rutina: 

10 REM TURF 
20 CLS 

30 PR1NTAT 14,1 ;' Jff *TURP**" 

40 PRINT AT 0,6 ; Jr D!SP0NE 1NIC1ALMENTE DE 4,000 
PTS.' J 

50 PRINT : PRINT "LA APUESTA MAXIMA ES DE 1.500 
PTS." 

60 PRINT :PRINT "SI GANA EL CABALLO APOSTADO, SE" 
70 PRINT "MULTIPLICARA POR TRES LA CANTIDAD JU 
GADA rJ 

80 PRINT AT 2,23; "PULSE UNA TECLA PARA COMEN 
ZAR' J ; 

00 LET B$=INKEY$:IF B$='"'THEN GOTO 90 

A ía hora de confeccionar este progra- 
ma, se ha supuesto que la presentación 
en pantalla es de 24 filas (de la O a la 
23) por 40 columnas (de la O a la 39). 

En el caso particular de que el orde- 
nador utilizado no comparta dicho tama- 
ño de pantalla, habría que acomodar el 
cartel de entrada al número de filas y 
columnas disponibles. Esto mismo afec- 
tará también a la presentación en pan- 
talla del resto del programa. Por ello es 
aconsejable consultar previamente el 
manual que acompaña a cada equipo. 



Utilizando los comandos PRINT y PRINT 
AT, se sitúan los diversos textos en su 
lugar correspondiente, para que queden 
centrados y produzcan una presentación 
agradable. 

Al final del segmento de programa 
que se encarga de crear el cartel de en- 
trada, se encuentra una instrucción que 
hace uso de la función !NKEY$ y una 
sentencia IF/THEN (línea 90). A prime- 
ra vista, la referida línea de programa 
parece totalmente ajena al objetivo de! 
cartel de entrada. Su cometido no es 
más que el de producir una espera por 
parte del ordenador, para dar tiempo a 
leer el cartel de entrada. De otra forma, 
el cartel desaparecería casi instantá- 
neamente sin cumplir su cometido. 

Para evitarlo, mediante el comando 
INKEY$ se comprueba si se ha pulsado 
alguna tecla. Si es así, proseguirá la eje- 
cución del programa en la línea siguien- 
te (que aún no ha sido escrita). De lo 
contrario, se volverá a comprobar si se 



ha pulsado ya una tecla (GOTO 90), Así 
pues, el segmento principal del progra- 
ma no empezará a ejecutarse hasta que 
lo ordene el usuario; orden que introdu- 
cirá pulsando una tecla cualquiera. 

El resto del programa se puede dividir 
en tres segmentos con entidad propia. 
Una primera parte indicará la cantidad 
de dinero de la que se dispone, y pedirá 
la que se desea apostar, así como el ca- 
ballo al que va dirigida la apuesta. La 
segunda parte se encargará de simular 
la carrera de caballos a lo largo de la 
pantalla. Por último, en la tercera parte 
se comprobará si el caballo ganador 
coincide con el apostado, para así actua- 
lizar la «bolsa» del apostante. 



La primera parte del núcleo del pro- 
grama se ocupará, como ya se ha indi- 



Hagan juego, señores 
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El juego permite apostar una 
cantidad de dinero cuyo límite 
máximo se determina dentro del 
programa ; dinero que el jugador 
puede perder o triplicar según el 
resultado de la carrera. 




cadc r de recoger ¡a cantidad a apostar y 
el numero del caballo en el que se va a 
invenir Pero antes de ello habrá que 
inicie zar una variable (D) con la canti- 
dad de dinero disponible para apuestas. 
Esta será, como se indicó en el cartel de 
entrada, de 4.000 ptas. Dicha acción se 
efectúa en la línea TOO que contiene, 
además, ef dimensionado que las matri- 
ces X y C; matrices que se utilizarán más 



adelante para memorizar las coordena- 
das actuales de cada uno de los caba- 
llos en carrera. 

El listado de esta primera parte es el 
siguiente; 

100 DIM X(5);DfM C(5):LET D=4Ü0G 
110 CLS:IF D-ü THEN PRINT "NO QUEDA DINERO PARA 
AP0STAR';END 
120 PRINT TIENE Jr ;D; Hr PTS." 



BOLETO 

■ APUESTAS HIPICAS 


C 


) 1 VELOZ PRINT 


□ 2 CHIP 


* 


[ 3 MICRO D'ORO 


□ 


1 4 PERIFERICO! 


□ 


1 5 LOADOR 


□ 


1 6 BIT- BIT 


□ 


7 GOTON 




I ia función RND hará que el 
resultado de la carrera 
quede en manos del azar.,, 
¡No hay caballo favorito 
de antemano! 




130 PRINT 

140 INPUT "CUANTO APUESTA ”;A 

150 IF A>0 AND A<=1500 AND A<4) THEN GOTO 180 

160 PRINT 'APUESTA NO VALIDA" 

170 GOTO 130 
180 PRINT 

ISO INPUT '(DEL 1 AL 5) A QUE CABALLO ";C 
200 IF C<1 ÜR 05 THEN GOTO 180 
210 LETD=D— A 

La línea 110 borra la pantalla con 
CLS, para dejarla en condiciones de ser 
reutilizada en esta primera zona del pro^ 
grama. De esta forma, nada habrá que 
estorbe o distraiga la concentración del 
apostante. 

Como quiera que esta zona debe eje- 
cutarse de nuevo cada vez que conclu- 
ya una carrera, sea cual fuere el resul- 
tado de la misma, se ha incluido en la 
propia línea ItO una comprobación de 
la cantidad que posee el apostante. El 
programa finalizará si de esta compro- 
bación resulta que la cantidad de dine- 
ro disponible es igual a cero... ¡el juga- 
dor se ha arruinado! 

La línea 1 20 indicará en cada pasada 
Ja cantidad actual de que dispone el 
apostante. Más adelante, la línea 140 
pide, mediante un comando INPUT, la 
cantidad que se va a apostar en la pró- 
xima carrera; cantidad que se almace- 
nará en ía variable A. 

En la línea siguiente se comprueba si 
la cantidad es correcta. Para ello debe 
tratarse de un número mayor que cero 
(A>Ü), menor o igual que la apuesta má- 
xima, que es de 1 .500 ptas. (A ^ 1 .500) 
y menor o igual que la cantidad que po- 
see actualmente el apostante (A < D). 
Esta comprobación se realiza agrupan- 
do las condiciones antes citadas en una 
sola, en torno al operador lógico AND. 
Así, pues, deben cumplirse todas ellas 
para que esta nueva expresión lógica 
sea cierta (valor lógico 1). La menciona- 
da expresión se utiliza para decidir, den- 
tro de la instrucción IF/THEN de la lí- 
nea 150, qué acción hay que empren- 
der: saltar a la línea ISO del programa, 
si es cierta la expresión, o bien presen- 
tar el mensaje de "APUESTA NO VALI- 
DA" y volver a la línea 130 para pedir 
una nueva apuesta. Esto último, en el 
caso de que la expresión adoptara el va- 
lor lógico O (falso). De forma totalmente 
análoga, se pedirá el número del caba- 
llo al que se dirige la apuesta. Dicho va- 
lor se asignará a la variable C, en la lí- 
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CO NDICIONES PARA LA APUESTA: 

> °P*s 

^5^ < 1500 Pts 

< s 




En el programa se comprueba ¡a vaítdez de la apuesta examinando el contenido de 
la variable A Las tres condiciones impuestas se funden en una sola expresión por 
medio del operador lógico AND. 




nea 190, A continuación se comprueba, 
en la línea 200, si el valor introducido 
es correcto. En este caso se emplea el 
operador lógico OR para construir la ex- 
presión de control de la instrucción 
ÍF/THEN. Esta adoptará el valor lógico 
1 cuando C sea menor que 1 , o cuando 
sea mayor que 5 (caballos no válidos), 
siendo entonces cierta la condición y 
ejecutándose la zona THEN, Así se en- 
vía el flujo de ejecución del programa a 
a línea 180, en la que se pide de nuevo 
un valor para C, ya que el anterior no 
era válido. 

Finalmente, en la línea 210 se resta 
del total, contenido en la variable D r la 
cantidad apostada. Las línea situadas a 
continuación corresponderán a la se- 
gunda parte del programa. Zona que se 
encargará de realizar la carrera propia- 
mente dicha. 



No va más... 



La segunda zona del programa debe 
simular en la pantalla la carrera de los 
cinco veloces «purasangre». A modo de 
recordatorio, se indicará la cantidad y el 
numero del caballo apostados; desde 
luego, después de haber utilizado el co- 
mando CLS para dejar limpia la «pista 
de carreras». 

Acto seg uido se trazará la línea de sa- 
lda y la línea de llegada. Para ello se 
hace uso de la sentencia repetitiva 
FGR/NEXT, junto con los correspon- 
dientes PRfNT AT, que imprimirá un sig- 
no consistente en una barra vertical (o 
el signo más parecido de que se dispon- 
ga, para lo que habrá que consultar el 
manual del equipo utilizado y buscar en 
el repertorio de caracteres). 

Queda aún una tarea previa, antes de 
pasar a codificar la zona que se ocupará 
de «abrir los cajones de los caballos»: 
iniciaiizar las variables para las coorde- 
nadas horizontal y vertical de cada ca- 
ballo. Estas coordenadas se almacena- 
rán en cada uno de los cinco elementos 
de las matrices X y C. Como se recorda- 
rá, ambas fueron dímensionadas en la 
ínea 100 del segmento anterior. 

En la variable suscrita X() se almace- 
nará el valor actual de la coordenada 
horizontal. Su contenido debe ser incre- 



mentado (de forma aleatoria), puesto 
que la carrera transcurrirá desde el 
margen izquierdo hasta el derecho de la 
pantalla. La matriz C(), en cambio, man- 
tendrá siempre valores constantes, que 
corresponden a la coordenada vertical; 
valores que delimitan 3a línea o «calle» 
por la que avanzará cada caballo. 

El contenido inicial de esta matriz 
marca, por lo tanto, la línea imaginaria 
que seguirá cada caballo. Para lograr 
una distribución simétrica y evitar que 
«se molesten unos a otros», se elegirán 
de tal forma que queden tres líneas en 
blanco entre cada dos caballos. Así, los 
valores elegidos, siempre considerando 
una pantalla de 24 líneas horizontales, 
pueden ser: 3, 7, 1 1 , 15 y 1 9 

El hecho de almacenar estos valores 
en una variable suscrita se debe a que 
simplifica en gran medida la zona del 
programa que se encargará de situar a 
cada caballo en su lugar correspondien- 
te. Así, se puede incluir esta acción en 
un bucle FOR/NEXT. De otra forma se 
necesitaría una línea de programa para 
cada uno de los cinco caballos. Ello ha- 
ría quizás más rápida la ejecución del 
programa, pero, evidentemente, el lista- 



do sería más extenso. Este segmento del 
programa adopta el siguiente aspecto: 

220 CLS 

230 PRINT AT 4, Gf APOSTAD AS M ft Jr PTS. AL CABALLO 
fH ;C 

240 F0R L=1 TO 21 PRINT AT 2 J L/'j' :PRINT AT 
37,L;T':NEXTL 

250 LEI C(1)=3:LET C(2)=7:LET Cf3)=11:LET C(4)=15:LET 

qsj=i9 

260 FOR 1=1 TO 5iET X{l)=0:LET H=C(I): GOSÜB 50Ü:NEXT 
I 

Como ya se indicó, en dicha porción 
del programa se muestran la cantidad y 
el caballo que son objeto de la apuesta. 
Acción que se realiza en ta línea 230. A 
continuación (línea 240) se trazan los lí- 
mites de la pista por medio det bucle an- 
teriormente explicado. 

El objeto de las instrucciones conte- 
nidas en la línea 250 no es otro que dar 
valores a los elementos de C(); valores 
que coinciden con los propuestos más 
arriba. 

La línea 260 utiliza de nuevo una ins- 
trucción iterativa FOR/NEXT. Esta se re- 
pite tantas veces como caballos corren 
(5). El mismo bucle se aprovecha para 
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M=X(1 Y IH=C[1 B+X(2|*(H=C(2)]+Xí3HH=Cf3|J +X(4)*(H=C[4»+ 
X|5) f (H=C(5)) 




La zona del programa que controla la 
carrera hípica está constituido por un bucle , 
En las sucesivas ejecuciones del mismo, se 
avanzan aleatoriamente las posiciones de 
ios distintos caballos en carrera . hasta que 
uno de ellos alcanza la meta. 



inicializar la matriz X con ceros (LET 
X{J)=0), que son ías coordenadas hori- 
zontales de partida de los caballos. Den- 
tro del bucle se llama a una subrutina 
que se situará a partir de la línea 500. 
La misión de esta subrutína es la de 
mostrar en pantalla cada caballo en su 
posición actual. Justo antes de invocar 
a la subrutina, se almacena en la varia- 
ble H la coordenada vertical del caballo 
en curso (recuérdese que en cada pasa- 
da la variable I toma un valor diferente, 
este valor sirve para identificar a cada 
caballo). 



La referida subrutina aparece codifi- 
cada en las siguientes líneas: 

500 let 

=C(%X(5)*ÍH=C(5]j 
510 PftINT AT 
520 RETURN 

Su funcionamiento es el siguiente: 
mediante un comando PRIIMT AT se se- 
lecciona el punto de la pantalla en el 
que se va a situar a! cabalfo. Para ello, 
la coordenada horizontal se calcula me- 
diante la expresión de la línea 500: 




Para la 

representación en 
pantalla de la prueba 
hípica, se utilizan dos 
matrices o variables 
de conjunto: C() y 
X(). Ambas 
almacenan 
respectivamente , las 
posiciones verticales 
y horizontales de 
cada caballo. 



Esta expresión se puede dividir para 
su estudio en dos partes: una lógica y 
otra aritmética. La parte lógica calcula 
el valor lógico (0 ó 1 ) de los términos 
del tipo H-C(j) H siendo j un valor conv 
prendido entre 1 y 5. Sólo una de las 
cinco expresiones será cierta: aquella 
cuyo valor actual de H coincida con el 
valor correspondiente de la matriz C{). 
Por lo tanto, ésta adoptará el valor lógi- 
co T, mientras que las demás tomarán 
el valor 0. La zona aritmética se limita 
a multiplicar ese valor lógico por el va- 
lor actual de la coordenada horizontal. 

Esta última se encuentra almacenada 
en la matriz X(). Así, por ejemplo, si al 
efectuar la llamada a la subrutina se 
asigna a la variable auxiliar H el valor 
contenido en C(2), sólo el paréntesis que 
contiene a la expresión H = C(2) adopta- 
rá el valor 1. Todos los demás valdrán 
0, con lo que el producto de ese 1 por 
X(2) dará como resultado el valor con- 
tenido en X(2), siendo nulos los demás 
sumandos. 

La otra coordenada corresponde sim- 
plemente al valor de EL Una vez cono- 
cida la posición, se imprime en pantalla 
el símbolo del caballo. Para ello se hace 
uso del número de cada animal. Este se 
calcula a partir del valor de la variable 
H. La relación entre H (posición vertical 
deí caballo en curso) y el número iden- 
tlficatívo del caballo viene dada por la 
fórmula: 



<numero>=(H+1]/4 



Esta fórmula habrá de ser corregida 
en el caso de elegir unas coordenadas 
verticales distintas a las aquí utilizadas. 

En este ejemplo se ha sacrificado la 
estética en función de la estandariza- 
ción. Por ese motivo los caballos se re- 
presentarán simplemente por medio de 
su número, escoltado por los símbolos 
y ">". Justo delante de estos tres 
símbolos número de caballo y 

">") se imprimirá un espacio en blan- 
co. Este tiene como misión borrar fa es- 
tela que iría dejando cada caballo al 
avanzar por la pista, debido a la impre- 
sión sucesiva de los símbolos 



8 





En el programa confeccionado se contempla ¡a participación de cinco caballos en 
carrera: este número puede modificarse sencillamente sin más que introducir 
ligeras variaciones en el listado final 



Llegado el programa a este punto, tan 
sólo queda, para poner fin a esta segun- 
da parte, la zona encargada de hacer co- 
rrer a los caballos y de detectar !a lle- 
gada del ganador a la meta. El listado 
de las líneas que corresponden a dicha 
zona es el que figura a continuación. 

270 FOR J=1 TO 5 

280 LET H=C[J]:LET X(J)=X(J)+INTíRND+ 0.5):GOSUB 500 
290 IF X|J)>33 THEN LET J^S NEXT J:G0SUB 600:GOTO 
110 

300 NEXT j:GOTO 270 

Todo este segmento está incluido en 
un par de bucles. El primero de ellos 
(creado por el GOTO 270 de la línea 
300), se encarga de repetir todo el blo- 
que un número de veces suficientemen- 
te grande (teóricamente, infinitas ve- 
ces). Con ello se logra tener la certeza 
de que alguno de los caballos llega a la 
meta. La llegada se comprueba en la lí- 
nea 290, simplemente examinado si la 
coordenada horizontal de alguno de los 
caballos es superior a 33. Si es así, se 
dará por finalizado el bucle interno, po- 
niendo su contador (J) al máximo de la 
cuenta. 

Seguidamente se verifica si el caba- 
llo ganador coincide con el apostado. 
Esto último se ha de realizar es la sub- 
rutina colocada a partir de la línea 600. 
Más tarde se regresa a la línea 110 
iGOTO 110) para que tenga lugar una 
nueva apuesta. 

El bucle más interno (formado por los 
comandos FOR y NEXT de las líneas 270 
/ 300) se repetirá una vez por cada ca- 
ballo, siendo la línea 280 la que hará 
avanzar aleatoriamente a los equipos. 
Ello se efectúa mediante el comando 
RND, al que se añade la cantidad 0.5, 
de tal forma que el resultado de todo 
ello tendrá la misma probabilidad de ser 
0 ó 1. Lina explicación más a fondo de 
los usos de la función RND se encuen- 
tra en el siguiente capítulo de este mis- 
mo tomo. 

El resultado de dicha operación es su- 
mado al antiguo valor de la coordena- 
ziora horizontal. Una Mamada a la subru- 
:ina de la línea 500 sitúa al caballo co- 
rrespondiente en el nuevo punto de la 
oantalla. 

La salida de este segmento de progra- 
ma tiene lugar en la línea 290, median- 
te la llamada a una nueva subrutina si- 



tuada a partir de la línea 600. Subruti- 
na que constituye lo que hasta ahora se 
ha venido denominando «tercera parte 
del programa» y cuyo listado se ofrece a 
continuación: 



600 IF C=|H+1)/4 THEN PRINT AT 3,23; "ENHORABUENA, 
HA GANADO ';A*3;' J PTS. 'iET D=D+A*3:60TG 620 
610 PRINT AT 3,23 T0 SIENTO, GANO EL CABA- 
LLO' r ;(H+1 ]/4 

620 FOR E=1 TO 1000:NEXT ERETURN 



APOSTADAS 100 PTS. AL CABALLO 3 

i i 

<i>¡ 

i 

i 

<2> j 

I ! 

I 

<3> 

I I 

! I 

i I 

<4> 

I I 

I 

<5> 

I 

I I 

ENHORABUENA, HA GANADO 300 PTS. ■ 
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1 0 REM TURF 
20CLS 

30 PRINTAT !4,1 ; "***TURF ***“ 

40 PRINT AI 0,6 ; "DISPONE INICIALMENTE DE 4.000 PTS." 

50 PRINT : PRINT "LA APUESTA MAXIMA ES DE 1 .500 PTS.“ 

60 PRINT : PRINT "SI GANA El CABALLO APOSTADO, SE" 

70 PRINT "MULTIPLICARA POR TRES LA CANTIDAD JUGADA" 

80 PRINT AT 2,23 j "PULSE UNA TECLA PARA COMENZAR" 

90 LET B$ = iNKEY$ : IF 8$ = "" THEN GOTO 90 
100 DIM X(5):DIM C(5):LET D=4000 

1 ÍOCLSJF D=0 THEN PRINT "NO QUEDA DINERO PARA A POSTAR ":END 
120 PRINT "TIENE ";D;" PTS." 

130 PRINT 

1 40 INPUT "CUANTO APUESTA ";A 
1 50 IF A>0 AND A<= 1 500 AND A<=D THEN GOTO 1 80 
1 60 PRINT "APUESTA NO YAL! DA" 

170 GOTO 130 
180 PRINT 

190 INPUT “(DEL 1 AL 5) A QUE CABALLO ";C 
200 IF C<1 OR C>5 THEN GOTO 1 80 
210 LET D=D-A 
220 CLS 

230 PRINT AT 4,0;"APÜSTADAS ",A;” PTS. AL CABALLO “;C 
240 FOR L=1 TO 21 :PRíNT AT 2,L;"¡":PRINT AT 37,Lj'T':NEXT L 
250 LET C( 1 )=3:LET C(2)=7:LET C(3) = 1 1 :LET C(4) = 15:LET C(5) = 1 9 
260 FOR 1 = 1 TO 5:LET X(l)=0:LET H=C(l):GOSUB 500:NEXT I 
270 FOR J= 1 TOS 

280 LET H=C(J):LET X(J)=X(J) + INT(RND+0.5):GQSUB 500 
290 IF X(J)>33 THEN LET J=6:NEXT J:GOSUB 600:G0T0 1 1 0 
300 NEXT J:GÜTG 270 

500 LET M=X( 1 )*(H=C( 1))+X(2)*(H=C(2))+X(3)*(H=C(3))+X(4)*(H=C(4))+X(5)* 
(H=C(5)) 

510 PRINTAT M,H;" <”;(H+ 1 )/4j">“ 

520 RETURN 

600 IF C=(H+ 0/4 THEN PRINT AT 3,23;"ENH0RABUENA, HA GANADO ";A*3;” PTS.":LET 
D=D+A*3:G0TG 620 

610 PRINT AT 3,23 "LO SIENTO, GANO EL CABALLO ”;(H+ 0/4 
620 FOR E=1 T01 000:NEXT E:RETURN 



Esta última parte no tiene mayor com- 
plicación que la de comprobar si el ca- 
ballo ganador coincide con el que reci- 
bió la apuesta. De darse esta circuns- 
tancia, se procederá a calcular el impor- 
te ganado, mediante una simple multi- 
plicación por tres. En el caso de que el 



pronóstico no haya sido el acertado, se 
imprimirá el correspondiente mensaje. 

Antes de devolver el control al punto 
de llamada de la subrutina, se estable- 
ce un retardo mediante un nuevo bucle 
FGR/NEXT vacío. Retardo que permite 
ver el resultado. Una vez transcurrido 



ese tiempo se regresará al punto de par- 
tida. 

Desde allí se salta a la línea 1 10, don- 
de dará comienzo una nueva apuesta. El 
programa ha sido ya elaborado en su to- 
talidad y ofrece el aspecto que refleja el 
listado adjunto 
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Funciones 

BASIC 



Introducción de datos, 
funciones numéricas y 
de azar 



a mayor parte de 
las palabras BA- 
SIC mencionadas 
hasta ahora son 
comandos. En ef 
primer capítulo dedicado el manejo de 
cadenas alfanuméricas se introdujeron 
palabras que no eran comandos, sino 
funciones. La diferencia entre ambos ti- 
pos de órdenes estriba en su funciona- 
miento: si los comandos realizan accio- 
nes, las funciones ejecutan operacio- 
nes, Elfo significa que el efecto de una 
función será emitir un resultado en for- 
ma de dato. 

El uso del comando PRJNT dentro de 
una instrucción, por ejemplo, PRINT 
"HOLA", produce una acción; no emite 
un dato resultante de una operación. Di- 
cha acción corresponde con ia presen- 
tación en pantalla de la palabra HOLA. 
Sin embargo, la función LEFT$ (1, 
"HOLA") ejecuta una opeación cuyo re- 
sultado es el dato "H" Así pues, fun- 
ción es toda herramienta del vocabula- 
rio BASIC que proporciona un dato. A lo 
largo del presente capítulo se van a es- 
tudiar algunas funciones de interés, que 
servirán para sacar un mayor partido a 
la máquina. 

Introducción de datos 

Cuando en un programa es necesario 
introducir nuevos datos en cada ejecu- 




FUNCION 



cion, ello debe indicarse dentro del pro- 
pio programa. Tal cometido se realizaba 
hasta ahora por medio del comando IN- 
PUT. A pesar de su indudable utilidad, 
éste comando presenta ciertos inconve- 
nientes. Cuando la cantidad de datos a 
introducir es grande y se exige cierta ra- 
pidez, ia actuación de INPUT deja bas- 
tante que desear, puesto que obliga a 
pulsar la tecla RETURN tras cada dato 
introducido. El BASIC incorpora una 
función especializada en la introducción 
de datos Esta es INKEY$, la cual pro- 
porciona el carácter pulsado en el tecla- 
do, La diferencia entre INPUT e INKEY$ 
se observará con claridad a través del si- 
guiente ejemplo. 

A menudo, se utilizan decisiones 
aportadas por el usuario para desviar la 
ejecución del programa. Apelando al co- 




COMANDO 



mando INPUT, la forma de resolver tal 
necesidad puede coincidir con la que re- 
fleja el siguiente bloque de instruccio- 
nes: 

200 PRINT "DESEA CONTINUAR (S/N)?" 

210 INPUT K$ 

220 IF K$="S' J THEN GOTO... 

230 IF K$= Hr N' J THEN GOTO... 



Al llegar a esta zona del programa, el 
operador ha de teclear un dato (S ó N) 
y luego pulsar RETURN. . 

Si opta por utilizar fa función INKEY$, 
ya no será necesario accionar la tecla 
RETURN, puesto que dicha función re- 
coge un solo carácter del teclado. Sin 
embargo, INKEY$ no detiene ía ejecu- 



ta diferencia entre une función y un comando reside en ef hecho do que ía función 
proporciona un dato de salida, mientras que el comando realiza una función. 




La función ¡NKEY$ recoge ef carácter 
introducido a través del teclado. Comoquiera 
que su presencia no detiene la ejecución de! 
programa, es necesario construir un bude de 
espera para la captación del 
carácter. 



100 LET K$ = INKEY$ : IF K$ = ” " THEN GO TO 100 
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ción, con Jo cual, si no se pulsa la tecla 
en el momento oportuno, no se obten- 
drá ningún dato. En consecuencia, no 
será suficiente con cambiar la línea 210 
por: 

210 K$=[NKEY| 

Para evitar que la ejecución «pase de 
largo» es necesario crear un bucle; bu- 
cle que ha de permanecer cerrado sobre 
sí mismo hasta que se detecte ía pulsa- 
ción. Las instrucciones necesarias para 
programarlo se pueden agrupar en una 
misma línea: 

210 K$=INKEY$ IF K|='" r THEN GOTO 210 

Una vez que esta línea entre en acti- 
vidad, la secuencia de ejecución perma- 
necerá virtualmente bloqueada en la 
misma hasta que se accione una tecla. 

En definitiva, el nuevo aspecto del 
ejemplo resuleto con la función ll\IKEY$ 
será el que sigue: 

200 PRINT "DESEA CONTINUAR (S/N )?" 

21 Ü K$=INKEY$: IF Kfc" rH THEN GOTO 210 




Devuelve la parle entera de un número. 

Formato: INT(<número>) 

Ejemplos: 10 A=INT(17.5) 

50 PRINT INTfB+CI 



220 IF K$="S 1 THEN GOTO... 

230 IF K$="N" THEN GOTO... 

En algunos ordenadores no existe la 
función INKEY$, Cuando esto ocurre, 
suele utilziarse en su lugar un nuevo 
comando: GET. Lo mismo que antes se 
conseguía con LET K$=INKEY$, se obtie- 
ne ahora con GET K$L Aplicando el nue- 
vo comando al ejemplo anterior, sólo 
habría que cambiar una línea: 

210 GET K$ IF K$= 'THEN GOTO 210 



Jugando con números 

Suponga un programa en el que se 
desea realizar dos acciones distintas, 
dependiendo de si un número es par o 
impar. La forma de resolverlo es hacien- 
do uso de la instrucción IF/THÉIM. Pero, 
¿cómo detectar si el número es par? 

Sabemos que un número es par si es 
divisible por dos. Así, por ejemplo: 



6/2 = 3 y 5/2 = 2, 5; eí número 6 es par 
mientras que el 5 es impar. La diferen- 
cia radica en la parte fraccionaria, de tal 
forma que un número es par si el resul- 
tado de dividirlo por dos no posee parte 
fraccionaria. 

Para separar la parte entera de fa par- 
te fraccionaria se dispone, en BASIC, de 
la función INT. Esta devuelve la parte 
entera {IMTeger, entero) del número si- 
tuado en su argumento: 



PRINT INTf16,123) 
16 



La función JNT también permite cal- 
cular la parte fraccionaria. La parte frac- 
cionaria de un número N será N-JNT(N); 
esto es: el mismo número aunque des- 
provisto de la parte entera. A continua- 
ción se evalúa la parte fraccionaria del 
número del ejemplo anterior: 



PRINT 1 6,123-INT¡16,1 23) 
0.123 




I EI cometido de ía función i NT es 
extraer ía parte entera del dato 
numérico que se indique en ei 
argumento. 
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Volviendo al problema de! principio, 
se utilizará la función JNT para detectar 
cuándo un número es par. Resulta ob- 
vio que la parte entera de un número 
entero coincidirá con el mismo número. 
Luego si N es entero INT(N) y N tendrán 
el mismo valor. Esto es, precisamente. 
Jo que se va a utilizar para decidir sí el 
dato NÜM es par. 

JF NUM/2=INT(NUM/2] THEIM PRINT "PAR" 




Caícula el valor absoluto de un número. 

Formato: ABS (<n limero >) 

Ejemplos: 100 M0DU=ABS{D) 

120 PRINT ABS(Z) 



De esta forma, sí NUM/2 es igual 
JNT{NUM/2) entonces es que NUM/2 es 
entero. Y si NUM/2 es entero, resultará 
que NUJVI es par. 

El mismo procedimiento se puede uti- 
lizar para averiguar si NUM es divisible 
por cualquier otro número. Sencilla- 
mente, cambiando el 2 por el número 
deseado. NU M/7=INT(NUM/7) será 
cierto sí NUM es divisible por siete. 



Mas funciones: 
cuestión de signos 

Hay otras funciones que proporcionan 
resultados interesantes. Una de ellas es 
ABS, cuyo cometido es calcular el valor 
absoluto de un número. El siguiente 
ejemplo es una muestra de las posibili- 
dades de ABS: 




PRINT ABS(17) 
17 

PRINT ABSÍ-171 
17 



La función ABS resulta especialmen- 
te útil para determinar la separación en- 
tre dos números (sean A y B). Si se rea- 
liza la resta A-B, el resultado tomará 
un valor positivo si A es mayor que B; 
en caso contrario, el resultado será ne- 
gativo. Para obtener siempre un resul- 
tado positivo basta con poner ABS(A-B). 

Una función íntimamente relacionada 
con ABS es SGN. Como su nombre in- 



dica, SGN identifica el «SiGNo» de su ar- 
gumento. Entrega el valor 1 si el dato 
es positivo, -1 si es negativo y O sí el 
dato que figura en su argumento es 
nulo. 

Una aplicación de SGN puede ser la 
de adecuar el incremento de un bucle, 

FOR i=A T0 B STEP SGM(B— A) 




Recoge un carácter pulsado en el teclado. 

Formato: <var>INKEY$ 

Ejemplos: 70 K$=1NKEY$ 

50 B$=: KEY$ 



Se supone que el incremento ha de 
ser de una unidad y los valores de A y 
B no son conocidos. En consecuencia, si 
B es mayor que A el incremento ha de 
ser positivo, mientras que si es A el ma- 
yor, el incremento debe ser negativo. 
Ello se consigue con la cláusula STEP 
SGN(B- A). Cabe comprobar que cuando 
B es mayor que A, SGN(B“A) vale 1, y 
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>: ene 1 si el argumento es positivo, -1 sí es negativo y 0 si es nulo. 

Ornato: SGN(<nümem>) 

Ejemplos: 50 A=A+SGN(8) 

70 PRIMT SGM(W) 




en caso contrario -1 . Justamente lo que 
se pretendía conseguir. Si se desea un 
-cremento de valor distinto de 1 , e 
gual al valor INC, será suficiente con 
cambiar la parte STEP de la siguiente 
forma: 

— ’Q B STEP IMC*SGN(B— A} 




El azar 

En muchos juegos yen ciertos progra- 
mas de simulación, el «azar» tiene una 
gran importancia. En el juego del par- 
chís es fundamental el uso de un dado. 
En una simulación ha de contemplarse 



la variación aleatoria de algún factor 
(temperatura, viento..,). Esta componen- 
te aleatoria se puede simular perfecta- 
mente en el ordenador. 

El problema consiste en obtener una 
secuencia de números que no sigan 
(aparentemente) una regla fija, A cada 
uno de dichos números se le puede 
asignar, posteriormente, la cara de una 
moneda o de un dado, etc. De esta for- 
ma será posible evaluar los resultados 
de las distintas tiradas. 

Una posible forma de calcular una se- 
cuencia «pseudoaleatoria» puede ser la 
siguiente: 

1. Se parte de un número del 1 aí 10, 

2. Se eleva al cuadrado 

3. Se toma, del cuadrado, el dígito de 
mayor peso, 

4. Se vuelve al paso 2. 

Aplicando este método se obtendrán 
números de una cifra, sin una aparente 
relación entre sí. Véase, por ejemplo, la 
secuencia resultante a partir del núme- 
ro 9: 

9 ( 9 * 9=81 “ 8 ) 

3 ( 8 * 8 = 64 — 6 ) 

6 ( 6 * 6 = 36 — 3 ) 

3 ( 3 * 3 = 9 — 9 ) 

9 ... 

La sencillez de este método trae con- 
sigo varios problemas. En el ejemplo se 
ve que a partir del cuarto número la se- 
cuencia se repite. El caso peor es cuan- 
do se parte del valor 1. Al elevarlo al 
cuadrado se obtiene de nuevo un 1 y, 
por lo tanto, la secuencia se repite con 
el mismo valor. 

Existen métodos más complejos para 
el cálculo de secuencias «pseudoaleato- 
rias». Muchos de ellos son fruto de la 
aplicación de teorías estadísticas y de 
probabilidad. 

En la amplia mayoría de los dialectos 
BASIC, existe una función adecuada 
para calcular números pseudoaleato- 
rios. A esta función se accede por me- 
dio de la palabra clave RND (de RalSI- 
Dom, aleatorio en inglés). Generalmen- 
te RND precisa de un dato de partida o 
«semilla» de la secuencia pseudoaleto- 
ria. 

En algunos aparatos, la función RND 
sólo calcula el siguiente número de la 
secuencia, partiendo de la semilla. En 



Serera un número aleatorio comprendido entre cero y uno. 

RWD[(<número>)] 

Ee-;:s: A-RND(I) 

B=RND 



TABLA DE CONVERSION 


Ordenador 


RND 


RANDOMIZE 


INKEY$ 


GET 


INI 


ABS 


SGN 


RND [|<c>j] 


RANDOMIZE 


INKEY$ 


GET <variable> 


mi «núm» 


ABS (<núm.» 


SGN Kfiúm.» 


AMSTRAD 


RND «c» 


RANDOMIZE 


INKEY$ 




INT «núm» 


ABS «núm» 


SGN «núm» 


APPLE II 
(APPLESOFT] 


RND «c» 


RND(-<c>) 


- 


GET <var¡able> 


INT «núm» 


ABS «núm» 


SGN «núm» 


APRICOT 
(M- BASIC) 


RND [(<c>)] 


RANDOMIZE 


INKEY$ 




INT «núm» 


ABS «núm.» 


SGN «núm.» 


ATAR! 


RND «c» 


- 


- 


- 


INT «núm» 


ABS «núm.» 


SGN «núm» 


CBM 64 


RND «c» 


RND «c» 


— 


GET <variable> 


INT «núm» 


ABS «núm» 


SGN «núm» 


DRAGON 


RND (<A>H1) 


— 


INKEY$ 


- 


INI (<núm.>) 


ABS (<núm.>) 


SGN «núm.» 


EQUIPOS MSX 


RND «c» 


RND (-<c>) 


INKEY$ 


- 


INT «núm» 


ABS «núm.» 


SGN «núm» 


HP-150 


RND [(Ce»] 


RANDOMIZE 


INKEY$ 


- 


INT «núm» 


ABS «núm» 


SGN «núm.» 


IBM PC 


RND [(<c>)] 


RANDOMIZE 


INKEY$ 


- 


INT «núm» 


ABS «núm.» 


SGN «núm.» 


MPF 


RND «c» 


- 


- 


GET <variable> 


INT «núm» 


ABS «núm» 


SGN «núm.> 


NCR DM-V 
[MS-BASIC) 


RND («e»] 


RANDOMIZE 


INKEY$ 


— 


INT «núm» 


ABS «núm» 


SGN «núm» 


NEW BRAIN 


RND 


RANDOMIZE 


- 


- 


INT «núm» 


ABS «núm.» 


SGN «núm» 


ORIC 

1*'- 


RND 


RND (-<c>) 


KEY$ 


GET <variable> 


INT «núm» 


ABS «núm.» 


SGN «núm» 


SHARP MZ-700 
(MZ- BASIC] 


RND (1) 


RND Kc>) 


- 


GET <variable> 


INT «núm» 


ABS «núm» 


SGN «núm» 


SINCLAIR QL 


RND 

[<A>[TO<B>]](2) 


RANDOMIZE 


INKEY$ 


- 


INT «núm» 


ABS «núm» 


SGN «núm» 


SPECTRAVIDEO 


RND «c» 


RND Kc>) 


INKEY$ 


- 


INT «núm» 


ABS «núm» 


SGN «núm» 


ZX-SPECTRUM 


RND 


RANDOMIZE 


INKEY$ 


- 


INT «núm» 


ABS «núm» 


SGN «núm» 



<c>: Indica un número positivo cualquiera. No importa el valor de dicho número. <variable>: Nombre de variable de cadena alfanumérica. <núm>; 
Constante, variable o expresión numérica. 

(1) Calcula un número entero entre 0 y A. Si A vale O calcula un número entre O y 1. 

(2) Genera un entero aleatorio entre A y B. Si sólo se especifica A r genera un entero entre 0 y A. 

r los la semilla debe especificarse en- 
tre paréntesis, a continuación de RND. 

esta forma, siempre que se ejecute 
- ND (<número>) y el <número> sea el 

-ismo, se obtendrá idéntico resultado. Introduce una «semilla» para generar una nueva secuencia aleatoria. 

~ara encadenar los resultados y que el 

-úmero calculado sirva de semilla al si- Formato: RANDOMÍZE«semilla>] 

fíente, se puede hacer algo semejante 

s io que sigue: Ejemplos: 100 RANDOMIZE 

50 RANDOMIZE 7 




SPUTSEM 
r SEM-RND(SEM) 
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30 PRINTSEM 
40 GOTO 20 



Utilización del azar 



Con elfo se consigue una secuencia 
en !a que cada nuevo número sirve de 
semilla al siguiente. En un programa 
complejo se utilizaría SEM como nume- 
ro aleatorio y se volvería a realizar el 
cálculo de forma análoga a la línea 20, 

En ciertos dialectos BASIC la función 
RND no utiliza argumento, o carece de 
importancia el argumento que se le pro- 
porcione. En esos casos, dicha función 
se encarga por sí misma de guardar y 
reutilizar el último número generado. 
Para inicia I izar la semilla se dispone, 
entonces, de un comando adjunto: RAN- 
DOMIZE, en cuyo argumento se Índica 
la semilla que ha de iniciar la secuen- 
cia. 

Sea de una o de otra forma, la función 
RND dará, por lo general, un número de- 
cimal comprendido entre 0 y 1 , pero que 
nunca llegará a alcanzar 1 (será un dato 
del tipo O, XYZ). 



Haciendo uso de la función RND se 
puede simular cualquier fenómeno de 
tipo aleatorio; por ejemplo, el lanza- 
miento de un dado. Veamos cómo es po- 
sible construir un programa BASIC que 
calcule la puntuación asociada a la ti- 
rada de un dado. 

El corazón del programa seré, en efec- 
to, la función RND, El único problema 
reside en que dicha función calcula un 
número comprendido entre O y 1. Así 
pues, lo primero que hay que hacer es 
convertir dicho número en un entero 
menor que siete y mayor que cero. El 
primer paso consiste en multiplicar el 
número aleatorio por 6. 

De esta forma. Jos posibles datos es- 
tarán comprendidos entre O y 6; el nú- 
mero resultante podrá ser: cero con 
algo, uno con algo, hasta cinco con 
algo. Está claro que lo que interesa es 




R = RND 

0 < R < 1 



R = O'XXX 



S = 6 * RND 
0 < S < 6 



S = 0\l’X, 2\ 5X 



T = INT ( 6 * RND) 
0 < T < 5 



¡Tes entero! 1 = 0, 1,2,.. .5 



U = 1 + INT (6 *RND) 



1 < U < 6 



U = 1,2,3,... .6 



Secuencia de operaciones a realizar para modificar el rango 
de los números generados a partir de la función RND , 
en orden a simular el lanzamiento de un dado. 



la parte entera de este resultado. El se- 
gundo paso será, pues, hallar Ga parte 
entera mediante la función INT 

Al aplicar INT se obtiene un número 
entero comprendido entre el cero y el 
cinco. Ahora sólo falta sumar una uni- 
dad para obtener un número entero en- 
tre 0+1=1 y 5+1=6. Este será el aspecto 
del programa BASIC. 

10 REM DADO 
20 INPUT rJ SEMILLA Jf ;$ 

30 RANDOMIZE S 
40 PRINT HINT(6*RND) 

50 GOTO 40 

La línea 40 es la que realiza los cál- 
culos explicados más arriba. En gene- 
ral, para obtener un número entero 
comprendido entre N (mínimo) y M (má- 
ximo), ambos inclusive, la fórmula a 
aplicar es la siguiente: 

D AT0=N+ 1 NT((M=N+1 )* RND) 

Si se tiene en cuenta que RND pro- 
porciona números «equiprobables» (esto 
es: en cualquier momento todos los nú- 
meros posibles tienen la misma proba- 
bilidad de aparecer), se puede construir 
un ^lanzador de monedas» con la sim- 
ple instrucción: 

IF RNDX).5 THEN PRINT r 'CARA rJ ELSE PRINT "CRUZ" 

Ello también se puede conseguir tras- 
ladando el rango de los resultados de 
RND, como en el caso del dado. 

Otro método alternativo consiste en la 
puesta en práctica de la función SGN. 

M0NE=SGN(RND-0,5) 

Con este último ejemplo se obtienen 
los valores 1 ó -1 con igual probabili- 
dad. El contenido de MONE puede ser 
utilizado posteriormente para tomar una 
decisión aleatoria. En el siguiente ejem- 
plo se consigue un aumento o disminu- 
ción, de forma aleatoria del contenido 
de DATO. 

DATO =DAT0+SG N{ R N D— 0 . 5) 

En algunos intérpretes BASIC, la fun- 
ción RND da directamente un número 
entero. En tal caso, el rango de posibi- 
lidades se especifica en el argumento de 
RND. 
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Funciones 

matemáticas 



Las herramientas de 
cálculo del lenguaje 



BASIC 



o$ ordenadores 
nacieron como 
una herramienta 
de cálculo. La his- 
toria de la infor- 
mática se remonta a las antiguas má- 
quinas de calcular mecánicas. Quizás el 
más antiguo predecesor de los moder- 
nos ordenadores sea el abaco, con el 
que se podían realizar sumas, restas y 
hasta multiplicaciones. 

Los primeros ordenadores electróni- 
cos no iban mucho más allá. Hoy en día 
la actividad del ordenador abarca prác- 
ticamente todos los campos, pero sin 
duda, el cálculo matemático es uno de 
los principales. 

Todos los lenguajes de programación 
incluyen, entre su repertorio de instruc- 
ciones, funciones de tipo matemático. El 
BASIC es un lenguaje derivado de otro 
más antiguo: el FORTRAN. Este último 
estaba claramente orientado a los pro- 
blemas de índole científica y matemáti- 
ca, y por ello aportaba funciones mate- 
máticas de fácil uso. El BASIC ha here- 
dado del FORTRAN esta facilidad para 
el tratamiento de datos numéricos. 

En capítulos anteriores se ha hablado 
ce los operadores matemáticos elemen- 
tales. Con ellos se podían realizar ope- 
raciones tales como suma {+), resta (-), 
multiplicación (*), división (/) y poten- 
nación ("ót). Se vio también su uso en 
sentencias de asignación y como pará- 
metros calculados en el argumento de 
jn comando. Los siguientes ejemplos 
muestran estas posibilidades. 

_TS=A‘2+5*B 

A'2+5*B 

La capacidad de cálculo en BASIC no 
pueda ahí. Este lenguaje está capacita- 
do para realizar operaciones más com- 
plejas. 



o emir 

ui i -ii L 



SOFT 



SIN 


eos 


TAN 


éH 


e x i 


ASN 


ACS 


ATN 


Ln 


log 


7 


8 


9 


+ 


X 


4 


5 


6 


- 


T 


1 


2 


3 


- 


c 


0 


* 


* 


RCL 


STO 



Las posibilidades de cálculo de las 
fundones matemáticas dei BASIC 
no distan mucho de las de una 
cale ul adora cien tífica 




La resolución de cálculos 
trigonométricos es una de las 
vertientes contempladas en BASIC, 
Las funciones básicas para el cálculo 
del seno , coseno y tangente están en 
casi cualquier dialecto BASIC, 



Raíces cuadradas 

El lenguaje BASIC dispone de una 
-unción específica para el cálculo de raf- 
ias cuadradas. Esta función ha sido uti- 
izada con anterioridad dentro de la 
:bra, para realizar algunos pequeños 
cálculos. 

Su formulación es muy sencilla, se 
aooya en la palabra clave SQR (del in- 



glés SQuare Root, raíz cuadrada). Dicha 
palabra clave ha de ir seguida por el ar- 
gumento, que no es más que el dato del 
que se desea extraer la raíz, situado en- 
tre paréntesis. Así pues, para hallar la 
raíz cuadrada de 2 basta con escribir 
SQR(2). 

Esta, al igual que las restantes fun- 
ciones de tipo matemático, debe estar 
acompañada por un comando BASIC; 



por ejemplo, puede ir precedida por el 
comando LEI dentro de una sentencia 
de asignación: 

10 LEÍ RAIZ=SQR(2| 

Él argumento de SQR ha de contener 
un dato numérico entre paréntesis. Este 
dato puede pertenecer a cualquiera de 
los títulos normales en BASIC: constan- 
te, variable o expresión. Así, se puede 
indicar el cálculo de la raíz cuadrada de 
una variable, con lo que se consigue 
una mayor flexibilidad de uso. 

Las expresiones matemáticas introdu- 
cidas en el argumento pueden incluir, 
normalmente, cualquier operador o fun- 
ción matemática BASIC (incluso otra 
raíz cuadrada); por ejemplo: 

LET RAIZ=SQR(A| 

LEÍ SQLU=SQR(6 f A+1/2) 

PRINT SQR(2+SQR(A/B]) 

Otras funciones 

La utilización de la función SQR es 
casi imprescindible para la resolución 
de cualquier problema matemático. Al 
profundizar algo más en el cálculo ma- 
temático se hace necesario el uso de 
funciones más complejas. El siguiente 
paso son las funciones trigonométricas. 
En BASIC se puede hacer uso del seno, 
coseno y tangente mediante las pala- 
bras claves SIN, COS y TAN respectiva- 
mente. Al igual que la función SQR, és- 
tas llevarán su dato de entrada entre pa- 
réntesis. El dato puede ser de cualquie- 
ra de los tres tipos anteriormente enu- 
merados. 

LET A = SGR( SI N( X)+ CÜS(X)) 

PRIMT TAN(A+2*B) 

Estos dos ejemplos ilustran las posi- 
bilidades de las funciones trigonométri- 
cas. El ángulo sobre el que actúan se 
debe dar, por regla general, en radianes. 
De esta forma, para calcular el seno (co- 
seno o tangente) de un ángulo expresa- 
do en grados, hay que pasar dicho án- 
gulo previamente a radianes. En todo 
caso, se puede escribir un pequeño pro- 
grama que realice tal conversión. Lo 
único que hace falta saber es que 180 
grados corresponden a (número Pl) ra- 
dianes. Con este dato y mediante una 
sencilla regla de tres, se consigue la fór- 
mula que permite pasar de grados a ra- 
dianes: radianes = grados *(tt/180). 
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10 REM PASO DE GRADOS A RADIANES 
20 LET Pl =3,1 41 6 
30 INPUT M GRADOS";G 
40 PRINT G*(PI/ 180 )/ J RADIArJES JÍ 
50 END 



En este programa se incluye la fórmu- 
la de conversión directamente en el co- 
mando PRINT de la línea 40. Es impor- 
tante introducir el valor de w directa- 
mente. En tal caso se puede acceder a 
su valor poniendo sencillamente el sím- 
bolo (tt) o, en otros equipos, el nombre 
(Pl). Con esta facilidad el programa se 
reduciría a la expresión siguiente: 



10 REM PASO DE GRADOS A RADIANES 
30 INPUT M GRAD0S";G 
40 PRINT G*( /18Q];"RADIANES" 

50 END 




I Ei lenguaje BASIC ha heredado del 
FORTRAN su facilidad para eí 
tratamiento de datos numéricos. 



trica. Su ejecución mostrará por panta- 
lla un aspecto similar al siguiente: 



RUN 

GRADÜS?45<CR> 
,7853981675 RADIANES 



De esta forma se puede hacer que el 
ordenador calcule senos, cosenos o tan- 
gentes de un ángulo dado en grados. 
Esta misma filosofía permite construir 
funciones que trabajen directamente 
con grados. El siguiente ejemplo mues- 
tra cómo realizar un programa que cal- 
cula el seno de un ángulo cuyo valor se 
introduce en grados. Para el coseno o ia 
tangente la actuación sería similar. 

10 INPUT "SENO ";G 
20 PRINT SIM(G* /180| 



Tanto de una como de otra forma ei 
programa proporciona el valor en radia- 
nes apto para ser incluido en el argu- 
mento de cualquier función trigonomé- 




Calcula el seno natural del ángulo incluido en su argumento. 



La expresión encerrada entre parén- 
tesis es la que transforma los grados en 
radianes. Algunos ordenadores permi- 
ten elegir el modo de operación (grados 
o radianes). Para ello disponen de dos 
comandos: DEG y RAD. El primero hace 
que los ángulos se tomen en grados. 
Así, las funciones operarán en lo suce- 
sivo con su argumento en grados. El úl- 
timo ejemplo se simplificaría adoptando 
ahora el siguiente aspecto: 



Formato: SIN (<ánguJo>) 

Ejemplos: 20 LET SEN0=SIN(ANG) 
70 PRINT SIN (2*X+1) 




Calcula el valor del coseno natural del ángulo incluido con su argumento. 

Formato: C0S(<ángulo>) 

Ejemplos: 20 LET C0N=C0S(ANG) 

70 PRINT COSíB +90) 



5 0EG 

10 INPUT "SENO ";G 
20 PRINT SIN(G[ 

EJ comando RAD restituye el modo de 
operación a radianes. 

El resto de las funciones trigonomé- 
tricas (secante, cosecante y cotangente) 
pueden ser calculadas a partir de estas 
tres. Su equivalencia es la siguiente: 

Secante (Xj=1/C0S|X] 

Cosecante (X)=1/SIN(X) 

Cotangente )X)=1/TAN(X) 

Cuando se utilizan las funciones tri- 
gonométricas elementales se hace ne- 
cesario disponer de sus inversas (arco- 
seno, arcocoseno y arcotangente). 
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Calcula el valor de la tangente del ángulo Incluido en su argumento. 




I Representación gráfica de las 

funciones COS(x) y ABS (COS(x)). Por 
medio de ellas es posible simular la 
trayectoria de una pelota botando 

Estas son las que realizan la acción 
contraria a las anteriores. Así, si X=se- 
no (A), sucede que A=arcoseno (X). 

En BASIC estas funciones se formu- 
lan de la siguiente forma:: ASN (arcose- 
no) r ACS (arcocoseno) y ATN (arcotan- 
-ente). Su utilización es idéntica a la de 
SIN, COS o TAN. 

50 IETA=ASN(0 I 5) 

TO PRINT AC$(X/SQR(2)| 

En algunos aparatos tan sólo se dis- 
pone de una de las funciones inversas, 
:or lo general ATN. Ello no plantea nin- 
:ún problema ya que las otras dos son 
ralculables a partir de ésta. Las fórmu- 
as que relacionan estas funciones en- 
:'s sí son: 

-SH (X)=ATN [X/SQRJ1 -X a 2)] 

*CS (X|=ATN (SQR(1 -X‘2)/X| 

La deducción de estas fórmulas es su- 
camente fácil con unos ligeros conoci- 
mientos de trogonometría. 



.Dgaritmos 

Tan importante como el uso de las 
Unciones trigonométricas es el de Jos 
rcaritmos. 

La mayoría de los intérpretes BASIC 
::seen una función capaz de calcular 



Formato: TAM¡<árgulo>) 

Ejemplos: 20 LEI TGN=TAN(AIMG) 
70 PRINT TAN(1 -45} 



logaritmos. Esta función suele ser LOG, 
que da el valor del logaritmo neperiano 
o natural del dato incluido en su argu- 
mento. Este logaritmo es el que tiene 
como base el conocido número e 
(2,718281.,.). 

Los siguientes son ejemplos válidos 
de uso de la función LOG 

PRINT LOGíT+14) 

LET X=5*L0G (17] 

Partiendo del concepto de logaritmo: 
Log h x=y 

en donde se cumple que: 

x=b* 

se observa que la función inversa resul- 
ta muy fácil de obtener. En las expresio- 
nes precedentes, b es Ja base (en este 
caso el número e). De ahí que para cal- 
cular el valor de x, conocido el valor de 
su logaritmo (y), será suficiente con ele- 
var el número "e" (la base) a la poten- 
cia indicada (y). En definitiva, para ha- 
llar, en BASIC, el antilogaritmo de un 
número Y servirían las siguientes lí- 
neas. 




Para que sea posible contemplar la 
amortiguación de los rebotes de la 
pelota , habrá que multiplicar la 
función ABS (COS(Xj) por la 
expresión exponencial EXP (-X/K). 



10 LET E=2. 71828182 
20 LET ANTILY=E‘Y 

No obstante, la mayor parte de los in- 
térpretes BASIC poseen una función 
adecuada para su cálculo directo. Se 
trata de la función EXP. Así pues, EXP(Y) 
equivale a 2,71 8281 82" Y. De esta for- 
ma, el anterior ejemplo quedaría redu- 
cido a: 

20 LET ANTILY=EXP(Y| 

Otros ordenadores disponen también 
de una función adecuada para hallar lo- 
garitmos cuya base es el número 1 0. Di- 
cha función es accesible por medio de 
la palabra clave LOGIO. 

El hecho de que sean pocos los orde- 
nadores que incluyen esta última fun- 
ción no plantea inconveniente algino. Es 
perfectamente posible calcular logarit- 
mos de cualquier base partiendo de los 
neperianos. Para deducir la fórmula que 
permite expresar logaritmos de una 
base cualquiera b mediante logaritmos 
neperianos, basta con conocer una sim- 
ple propiedad de los logaritmos: 

K.Log x=Log x k 

Así pues, si y es el logaritmo decimal 
de un número x, resulta cierto que: 

Y=Log 1ü x=>>FlO 

Si se aplican logaritmos a los dos 
miembros de la segunda expresión (Log e - 
= Ln) queda: 

Ln x=Ln 10 

Según la propiedad anteriormente 
mencionada, se puede sustituir el se- 
gundo mimbro de Ea igualdad 

Ln jí=y*Ln 10 

Ahora sólo queda despejar la variable 
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La ejecución del programa B OLA 4 
contempla la amortiguación de los 
sucesivos rebotes . En el caso 
ilustrado se otorga el valor 1 a la 
constante K: la amortiguación es 
instantánea y no da pie a rebote. 

y, que coincide can et valor del logarit- 
mo en base 10 de x. Con ello se obtiene 
la fórmula buscada: 

V =L °Sio C*fo 



I Si la constante K fuera igual a 1 5, 
la amortiguación sería ya más 
realista 



Si lo que desea es calcular logaritmos 
de otra base, basta pues con indicar la 
nueva base en el argumento del loga- 
ritmo neperiano situado en el denomi- 
nador de la expresión. Esta fórmula se 
codificaría en BASIC como sigue: 




■ e incluso puede realzarse 

asignando un valor superior a K, 
por ejemplo K = 30. 



LET LBX=L0G(X)/L0G[B) 

En la variable B debe encontrarse al- 
macenado el valor de la base deseada. 
De esta forma, en LBX se obtiene el lo- 
garitmo en base B del número X. 





Calcula el arco cuya tangente es et valor que aparece en su argumento. 

Formato: ATI\l(<dato>) 

Ejemplos: 20 LET ARCO =ATN(X) 

70 PRINT ATN|A+B/2) 



Matemáticas divertidas 






Las funciones matemáticas expuestas 
serón de gran utilidad para la resolución 
de problemas sofisticados. Cualquier 
estudio avanzado, dentro de cualquier 
disciplina, desde la economía hasta la 
física, hace uso de los logaritmos y de 
los funciones trigonométricas. Sin em- 
bargo, no es necesario apelar a la alta 
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Permite el cálcuío de las funciones trigonométricas expresando los ángulos en grados. 
Formato: (número de línea) DEG 
Ejemplos: 30 DEG 




Especifica, en el cálculo de funciones trigonométricas, que los datos se dan en radianes. 
Formato: (número de línea) RAD 
Ejemplos: 20 RAO 




Calcula el valor del logaritmo neperianc del date dado en su argumento. 



matemática para dar un ejemplo del uso 
de estas funciones. Incluso es posible 
conseguir efectos divertidos con las fun- 
ciones estudiadas. 

Por ejemplo, se puede simular la tra- 
yectoria de una pelota botando por me- 
dio de las funciones trigonométricas. 
Para elfo se utilizará el coseno, aunque 
bien es cierto que se podría utilizar el 
seno con parecido resultado. Más con- 
cretamente, y a la vista de las respecti- 
vas representaciones gráficas, se hará 
uso del valor absoluto del coseno- 

Al variar el valor de X en la expresión 
ABS (COS(X)) se van obteniendo dife- 
rentes datos. Estos datos pueden asimi- 
larse a las distintas alturas que toma la 
pelota. Por medio del comando PRINT se 
puede plasmar esa trayectoria en la 
pantalla. Las coordenadas X e Y del mo- 
vimiento se corresponderán con los dos 
parámetros del argumento del comando 
P RÍNT AT. Estas coordenadas coincidi- 
rán con X y ABS (COS(X)) respectiva- 
mente. El valor de X se modificará, ob- 
teniéndose así las diferentes posiciones. 
Como carácter a imprimir en las respec- 
tas posiciones se utilizará la letra O 
por su similitud con una pelota. El cuer- 
eo principal del programa lo constituirá, 
pues, la siguiente instrucción: 

30 PRINT AT(X r ABS(C0S(X))) "O' 4 

Esta línea debe arroparse con un bu- 
rle FOR, que permita introducir la varia- 
rión de X. Puesto que X corresponderá 
a la coordenada horizontal de AT (co- 
umna de texto en pantalla) sus valores 
míte no deben sobrepasar el número 
de columnas permitido por el equipo. En 
el ejemplo utilizaremos el número 30 
romo valor máximo de X, aunque el 
usuario puede cambiarlo por aquel que 
:é una mejor representación en su pro- 
: a pantalla. 

Por otra parte, es sabido que el valor 
□el coseno se mantiene entre 1 y -1. 
Con lo cual su valor absoluto variará en- 
"■e 0 y 1 , Para conseguir una mayor am- 
□íitud en el movimiento vertical será ne- 
:=sario aumentar este rango de varia- 
: ón. Ello se realiza multiplicando dicha 
expresión por el número de filas que 
:eba abarcar. Veinte es un número que 
:srá buen resultado en la mayoría de 
is ordenadores. Al igual que ocurría 
:on el tope de amplitud horizontal, el 

uarío puede elegir el valor que consi- 



Formato: LGG|<dato>) 

Ejemplos: 10 LEÍ LGX=LGG(X) 

75 PRINT LQG(14*S+2) 

dere más propiado para las característi- 
cas de su ordenador: 

20 FOR X=! T0 30 

30 PRINT AlíXjNT(20 # ABS(COSfX|)) f0' r 
40 NEXTX 



Como puede verse se ha calculado la 
parte entera del resultado de la expre- 
sión en la zona "y" del argumento de 
AT. Ello evitará posibles errores deriva- 
dos de la exigencia de utilizar un núme- 
ro entero de filas de texto. 




21 



TABLA DE CONVERSION 


Ordenador 


Conversión de ángulos 


Logaritmos 


DEG 


RAD 


LOG (<X>) 


LOG 10 «X>| 


EXP (<X>) 


AMSTRAD 


DEG 


RAD 


LOG (<X>) 


L0G10(<X>) 


EXP (<X>) 


APPLE II 
(APPLESOFT) 


- 


- 


LOG (<X>) 


- 


EXP (<X>) 


APRICOT 

(M-BASIC) 


- 


~ 


LOG (<X>) 


- 


EXP (<X>) 


ATAR! 


DEG 


RAD 


LOG (<X>) 


CLOG (<X>) 


EXP (<X>) 


CBM64 


- 


- 


LOG (<X>) 


— 


EXP (<X>) 


DRAGON 


- 


- 


LOG «X» 


- 


EXP (<X>) 


EQUIPOS MSX 


- 


- 


LOG (<X>) 


- 


EXP (<X>) 


HP-150 


— 




LOG (<X>) 


- 


EXP (<X>) 


IBM PC 


- 


- 


LOG (<X>) 


- 


EXP (<X>) 


MPF 


- 


- 


LOG (<X>) 


- 


EXP (<X>) 


NCR DM-V 
(MS-BASIC) 


- 


- 


LOG «X» 


- 


EXP «X» 


NEW BRAIIM 


DEG (1) 


RAD (1) 


LOG (<X>) 


- 


EXP (<X>) 


CRIC 


- 


- 


LN (<X>) 


LOG (<X>) 


EXP (<X>) 


SHARP MZ-700 
(MZ BASIC} 


- 


RAD |<X>) (2) 


LN (<X>) 


LOG (<X>) 


EXP (<X>) 


SINCLAIR QL 


DEG (<X>)(2) 


RAD (<X>) (2) 


LN (<X>) 


LOGIO (<X>) 


- 


SPECTR AVÍDEO 


— 


- 


LOG (<X>) 


- 


EXP (<X>) 


ZX-SPECTRUM 


- 


- 


LN «X» 


- 


EXP (<X>) 



(1) Sólo aplicables en comandos gráficos. (2) Son funciones, devuelven el valor en radianes (RAO) o grados (DEG) del argumento (expresado en la unidad 
contraria). 



Sólo falta poner una línea adicional 
con una instrucción de borrado de pan- 
talla para que la trayectoria no quede 




enmascarada por el texto que pudiera 
existir en la pantalla. El programa com- 
pleto adoptará el siguiente aspecto. 



10 REM BOLA 1 
15 CLS 

20 POR X=1 T0 30 

30 PRIMT AT(XjNT(20*ABS(CQS(X))( )' 0 r ' 

40 NEXTX 
50 EWD 

AL ejecutar este primer programa, el 
resultado no es exactamente el desea- 
do. El problema radica en que el valor 
del coseno se repite cada 6,28 (2x ra- 
dianes) unidades de X). En consecuen- 
cia, su valor absoluto se repite con ma- 
yor frecuencia, exactamente cada uni- 
dades de X. De esta forma, al variar X 



Calcula el valor del antilogaritmo del número incluido en su argumento. (eí X). 

Formato: EXP(<dato>) 

Ejemplos: 30 LEÍ AN TI =EXP(K) 

120 PRINT EXPf-X/K) 
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TABLA DE CONVERSION 


Ordenador 


Raíz 

cuadrada 


Funciones trigonométricas 


SQR (<X>) 


SIN (<X>) 


COS (<X>) 


TAN (<X>) 


ASN (<X>) 


ACS [<X>) 


ATN (<X>) 


AMSTRAD 


SQR (<X>) 


SIN (<X>) 


COS (<X>) 


TAN (<X>) 


— 


- 


ATN (<X>) 


APPLE II 
{APPLESOFT) 


SQR «X» 


SIN «X» 


COS «X» 


TAN «X» 


— 


- 


ATN (<X>) 


APRICOT 

[M-BASIQ 


SQR «X» 


SIN (<X>) 


COS (OOÍ 


TAN (<X>) 


— 


- 


ATN «X>| 


ATARI 


SQR (<X>> 


SIN (<X>) 


COS (<X>) 


— 


- 


- 


ATN (<X>) 


CBM 64 


SQR «X» 


SIN (<X>) 


COS «X» 


TAN «X» 


- 


- 


ATN «X» 


DRAGON 


SQR (<X>) 


SIN (<X>) 


COS (<X>) 


TAN (<X>) 


- 


- 


ATN (<X>) 


EQUIPOS MSX 


SQR (<X>) 


SIN (<X>) 


COS «X» 


TAN «X» 


- 


- 


ATN «X» 


HP-150 


SQR «X» 


SIN (<X>| 


COS (<X>| 


TAN (<X>) 


- 


- 


ATN (<X>( 


IBM PC 


SQR (<X>) 


SIN (<X>) 


COS (<X>| 


TAN |<X>) 


— 


- 


ATN (<X>) 


MPF 


SQR «X» 


SIN «X» 


COS (<X>) 


TAN (<X>) 


- 


- 


ATN (<X>> 


NCR DM-V 
(MS BASIC) 


SQR [<X>) 


SIN (<X>) 


COS (<X>) 


TAN |<X» 


— 


- 


ATN «X» 


NEW BRAIN 


SQR «X>( 


SIN (<X>) 


COS (<X>) 


TAN (<X>) 


ASN (<X>) 


ACS (<X>) 


ATN (<X>) 


ORIC 


SQR (<X>) 


SIN«X» 


COS «X» 


TAN |<X» 


— 


- 


ATN «X» 


SHARP WI2-700 
MZ-BASIC) 


SQR «X» 


SIN (<X>) 


COS (<X>) 


TAN «X» 


— 


- 


ATN «X» 


SINCLAIR QL 

■ 


SQR «X» 


SIN «X» 


COS (<X>) 


TAN |<X>) 


ASIN (<X>) 


ACOS (<X>) 


ATAN «X» 


SPECTRAVIDEO 


SQR (<X>) 


SIN (<X>) 


COS (<X>) 


TAN (<X>) 


- 


- 


ATN (<X>( 


ZX-SPECTRUM 


SQR (<X>) 


SIN «X» 


COS «X» 


TAN «X» 


ASN (<X>) 


ACS (<X>) 


ATN <<X>) 



:s 1 a 30, se efectúan casi 10 rebotes. 
Ello significa que un rebote se plasma 
ri 3 columnas, con lo que el seguimien- 
:: de la trayectoria se hace muy difícil. 
La solución consiste en hacer que 
rada rebote ocupe más espacio. Lo que 
equivale a ordenar que se produzca un 
“enor número de ellos. La forma de 
conseguirlo se reduce a hacer que el ar- 
amento del coseno varíe dentro de 
_nos límites inferiores. Para ello será 
suficiente con dividir el argumento del 
reseño por un número. Cuanto mayor 
sea este número, menos rebotes se pro- 
rucirán. Dividiendo por 3 la nueva ver- 
s ón del programa será la siguiente; 



10 REM BOLA 2 
15 CLS 

20 FÜR X=1 T0 30 

30 PR1NT AT[XJNT(2Ü*ABS|CQS(X/3))) }"0" 
40 NEXTX 
50 END 



Esta vez sí que se aprecian los rebo- 
tes de la pelota. El único problema es 



que bota al revés. En efecto, se ve a la 
pelota caer hacia arriba y rebotar en el 
límite superior de ía pantalla. Este efec- 
to tiene su origen en el hecho de que la 
coordenada Y de! comando PRIN AT au- 
menta hacia abajo. Es decir: valores ma- 
yores proporcionan alturas menores en 
la pantalla. En el caso que nos ocupa, 
la expresión situada como coordenada Y 
proporciona el valor de la altura «au- 
mentando hacia arriba»... Es preciso dar- 
le la vuelta. Para ello, bastará con res- 
tar la citada expresión de su valor má- 
ximo: 

20 - 1 NT(2Q * AB $( C0S(X/3 ))). 
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SQR 

Halla la raíz cuadrada del dato situado en su argumento. 

Formato; SQR «dato» 

Ejemplos: 10 LET A=SQH(17) 

50 PRINT SQR(B+C) 




La función LOG está especializada 
en cálculo de logaritmos 
neperianos t cuya base es el 
número e 




El listado correspondiente a la trayec- 
toria puesta al derecho es el siguiente: 



10 REÑI BOLA 3 
15 CLS 

20 FORC=U0 3G 

30 PRINT AT(X,2Ü-IWT(2Q*ABS(COS(X/3])} "G 1 
40 NEXTX 
50 END 

■ 



Aún puede realizarse una nueva me- 
jora, Esta consistirá en introducir una 
amortiguación en los rebotes. Para ello 
se va a echar mano de otra de las fun- 
ciones explicadas en este capítulo. La 
amortiguación a simular será de tipo ex- 
ponencial, que responde a la siguiente 
fórmula: 

<valor amortiguado>=<valor no amor- 
tiguadores^ 



En ella, X es la variable que irá to- 
mando diferentes valores, mientras que 




Con la ayuda de funciones de esta 
categoría , el ordenador será capaz de 
suplir a cualquier sofisticado utensilio 
manual de cálculo con eficacia y 
comodidad para el programador. 



K es una constante que indica la velo- 
cidad de amortiguación. En el caso que 
nos ocupa, dicha fórmula adoptará el si- 
guiente aspecto una vez codificada en 
BASIC 

!NT|2Ü*ABS(CQS[X/3|))*EXP(— X/K) 

Aquí, el valor de K ha de ser especi- 
ficado previamente. Para encontrar el 
valor ideal puede realizarse un estudio 
más profundo de la teoría matemática 
concerniente al hecho. Sin embargo, el 
camino más corto consiste en utilizar el 
ordenador para hacer pruebas. En pri- 
mer lugar se dará el valor 1 a dicha 
constante para ver qué efecto produce. 
Así pues, el programa quedará definiti- 
vamente como sigue: 



20 REM BOLA 4 
15 CLS 

20 FOR X=1 TO 30 

30 PRINT AT(X, 20— INT 1 20* ABS(CGS(X/ 3))) *EXF(-X/1) 

nr 

40 NEXTX 
50 END 

El valor utilizado produce una amor- 
tiguación excesiva. La pelota, depués de 
golpear el suelo, no vuelve a ascender. 
Cambiando el valor de la constante K se 
conseguirán distintos grados de amorti- 
guación. Algunos de estos valores pue- 
der dar resultados plenamente satisfac- 
torios; al respecto, las figuras muestran 
trayectorias correspondientes a los va- 
lores de K coincidentes con los núme- 
ros 1 5 y 30. 
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Funciones a 
medida 



I Creación y uso de 
funciones definidas 
por el usuario 



■ la hora de cons- 
truir un programa 
hay que echar 
mano de las pala- 
bras clave del BA- 
SIC. Estas, como se sabe, pueden ser co- 
mandos o funciones. Las funciones son 
aquellas palabras reservadas cuya eje- 
cución proporciona un dato. Un ejemplo 
de función es SIN, cuyo cometido es cal- 
cular el valor del seno de un determi- 
nado dato numérico (valor del ángulo 
expresado en radianes). Un ejemplo de 
su modo de actuación es el siguiente: 

Í PfiINT SfN(3) 

.14112 

Normalmente, las funciones hacen 
~5ü de un dato, del que extraen la in- 
irmación para calcular el resultado pe- 
ído. En el ejemplo precedente, el dato 
éi el número 3. Estos datos que son oti- 
lados por las funciones reciben el ape- 
/o de «datos de entrada». De la mis- 
forma, los datos calculados por Ja 
--'ción (resultados) reciben el nombre 
se *dato$ de salida». 



■ jso de subrutinas 



-os intérpretes del lenguaje BASIC 
i_e:en incluir un nutrido conjunto de 
Arciones. Entre ellas se encuentran las 
«r estudiadas para el manejo de datos 
-unjéricos o aifanuméricos. 

ocasiones, puede resultar útil 
funciones específicas, no inclui- 
=££ directamente en el traductor BASIC, 
pra determinados cometidos Porejem- 
3 : si se desea calcular reiteradamente 
- ’ 0% de una serie de números, no es 
a^-r.ico repetir varias veces el mismo 
in^e de instrucciones. Para realizar 
cálculo sobre un dato contenido 



DEFFN 




El comando DEF FN permite ai usuario 
crear sus propias funciones. 




Las funciones pueden simularse con ei uso de subruttnas . Para elfo, estas últimas 
han de recoger el dato de entrada de una variable asignada al efecto . El resultado 
también será depositado en una variable. 



25 




En el BASIC 
tas funciones 
$e 

caracterizan 
por productr 
un dato de 
salida. Este 
suele 

calcularse a 
partir de 
cienos datos 
de entrada 
propor- 
cionados a 
la función , 



DATO DE 
SALIDA 




en la variable X será necesaria la si- 
guiente línea BASIC. 

10 LET DPC=(X/1QÜ)*1Ü 

Al ejecutarla, el resultado se almace- 
na en la variable DPC Para evitar la 
continua repetición del contenido de 
esta línea se puede hacer uso de una 
subrutina. Una subrutína, como ya se 
comentó en un capítulo anterior, es un 
fragmento de programa que puede ser 
utilizado varias veces por el programa 
principa!. La subrutina encargada de 
calcular el 10% tomaría este aspecto: 

1000 LET DPOÍX/1QQ)*lQ 
1010 RETURN 

En este caso, el dato de entrada de la 
«función 10%» se debe almacenar en la 
variable X. Una vez que se ha ejecutado 
la subrutina, el resultado aparecerá en 




Define la función de usuario indicada por las 

Formato: OEF FN<nombre>[«parámetros»]=<expresión> 

Ejemplos: 10 DEF FNA(X)=SIN(X)*X*2 
50 DEF FNPI-3.141592 



la variable DPC. E! uso de esta pseudo- 
función implicará tres pasos. El primero 
será situar el número base (del que se 
desea extraer e! 10%) en la variable X. 
Después se ha de «llamar» a la subruti- 
na; como quiera que ésta se encuentra 
en la línea 1000, se utilizará una ins- 
trucción GGSUB 1000. El último paso 
consiste en rescatar el resultado de la 
variable DPC. Estos tres pasos se plas- 
marían en BASIC de la siguiente forma: 

10 LET X=1 5000 
20 GÜSUB 1000 
30 PR1NT DPC 

Los referidos pasos habrán de ejecu- 
tarse cada vez que se quiera hacer uso 
de la subrutína. 

Las funciones construidas con la ayu- 
da de subrutinas son ligeramente engo- 
rrosas. Lo ideal sería disponer de fun- 
ciones definibles que adoptaran el as- 



pecto propio de las funciones que el BA- 
SIC ofrece dentro de su repertorio. 

Veamos cuáles son las diferencias 
entre la función definida previamente y 
una función existente en el seno del in- 
térprete; por ejemplo, la función seno. 

Para hacer uso de la función seno 
basta con recurrir a la palabra clave SIN, 
mientras que la función definitiva nece- 
sita de un GOSUB 1000. El dato de en- 
trada de SIN se adjunta como argumen- 
to de la función; es decir, acompaña a 
dicha palabra encerrado entre parénte- 
sis. En el caso del tanto por ciento, es 
preciso realizar una asignación previa 
de la variable adecuada (X), Además, el 
resultado de la función SIN se obtiene 
automáticamente al utilizarla, mientras 
que el resultado del tanto por ciento se 
ha de extraer de una variable (DPC). 

En el caso de la función implementa- 
da, basta con conocer el nombre de la 
misma y su utilización no implica la in- 
clusión de nuevas líneas de programa: 
sencillamente, puede emplearse en una 
sentencia de asignación o como argu- 
mento de otro comando o función. 

La función definida por medio de una 
subrutina necesita para su uso de más 
información. Es preciso conocer su lo- 
calización: el número de línea donde se 
encuentra la subrutina. Además de ello, 
es imprescindible tener conocimiento de 
los nombres de las variables que utiliza 
(en el ejemplo X y DPC). Este método im- 
plica un cierto espacio en el listado; ni 
más ni menos, el dedicado a la conse- 
cución de los tres pasos arriba mencio- 
nados. 

En BASIC existe otro método para a 
definición de funciones: se trata de una 
facilidad que incorpora el propio intér- 
prete bajo los auspicios del comando 
DEF FN. 



Definición de funciones 

El comando DEF FN permite al usua- 
rio definir sus propias funciones: éstei 
servirán para aliviar la confección de 
resto del programa. Su ámbito de actua- 
ción se limita al programa en el que se 
han definido. Esto es, si se introduce un 
nuevo programa no se conservarán las 
antiguas funciones. La definición de une 
función de usuario se realiza en uní 
sola línea de programa. En ella se de- 



instrucciones situadas en su argumento. 
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t Para la puesta en práctica de las funciones definidas por ei usuario, son necesarios dos pasos. En el primero i el ordenador toma 
nota de la función definida por medto del comando DBF FN. Posteriormente , cuando ésta sea utilizada dentro del programa la 
ni aquí na revisará la lista de fundones definidas para aplicarle y calcular el correspondiente resultado. 



“en incluir las palabras clave DEF y FN, 
:ontiguas y por ese orden; tras ellas, se 
escribe la definición de fa función. 

EJ formato de la definición de funcio- 
nes muestra el siguiente aspecto: 

>rujmero de línea) DEF FN<nombre> 
|<variable>)]=<operaciones> 

En dicha expresión cabe distinguir 
"es partes fundamentales, acompañan- 
::a las palabras DEF FN, Junto a la par- 
- FN se coloca un dato alfanumérr- 
:: que servirá de nombre a la función. 
A continuación, y entre paréntesis, se 
e:ja un nombre de variable que se uti- 
*rará como dato de entrada de la fun- 
: n. Por último, y tras el signo «igual», 

formulan las operaciones que calcu- 
lan el dato de salida. 

Un ejemplo de función definida es el 
3 luiente: 

: DEF FNDfXHX/IOOHO 

Se ha utilizado el mismo ejemplo que 
a iríncipio del capítulo. En esta ocasión 
3 -unción recibe el nombre «D». Ese es, 
3r=cisa mente, el carácter que acompa- 
se a FN. 

variable de referencia, utilizada en 



el cuerpo de la definición es X, El nom- 
bre de variable, encerrado entre parén- 
tesis, puede ser cualquiera. La única 
restricción está en que dicho nombre de 
variable debe coincidir con el que se 



emplee como dato de entrada en la de^ 
finición. En el caso enunciado, X sirve 
para calcular el 10% de ese valor. 

La variable referencial es una varia- 
ble ficticia». En efecto, no serrata es- 



I 


r 


i R 
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0(50) I 

i 




L 






I DEF FND(x)= (X/100) *10 




(50/100) * 10 



I 




Ai utilizar una función definida , ei ordenador evalúa la expresión 
contenida en su definición . Para elfo , sustituye la variable 
de entrada por el valor incluido como argumento de la función. 



27 




la mayor parte de los dialectos BASIC incorporan una 
nutrida colección de funciones predefinidas , 



tridamente de una variable auténtica, 
sino que sóio sirve para indicar cuál de 
los datos de la definición es el de entra- 
da. En el interior de la definición se pue- 
den incluir más variables, cuyos valores 
serán aquellos que tengan asignados en 
el momento de hacer uso de la función. 

Uso y disfrute de las funciones de 
usuario 

Se ha estudiado ya el modo de definir 
una función de usuario. Este es el paso 
previo, pero sin duda la faceta más im- 
portante es la de su puesta en práctica. 

Para acceder a una función definida 
hay que actuar de la misma forma que 
para acceder a una función propia del 
intérprete BASIC. En principio, se escri- 
birá el nombre de la función (nombre 
otorgado en la definición de la misma); 
no obstante, para indicar que se trata de 
una función definida por el usuario, su 
nombre debe ir precedido de las letras 
FN. Esta sería la forma de utilizar la fun- 
ción definida en el apartado precedente: 



nea de definición, puesto que si no se 
ejecuta esa línea, la función no será uti- 
lizadle, mostrando el aparato un men- 
saje de error. 



Biblioteca de funciones 

Para redundar en el aspecto práctico, 
se analizan a continuación algunos 



PRINT FND|5Ü|<CR> 
5 



En el ejemplo se pone de manifiesto 
su semejanza respecto a¡ uso de las fun- 
ciones propias del intérprete BASIC. Al 
igual que con aquellas, el argumento in- 
dica el dato de entrada. Dicho argumen- 
to se sitúa entre paréntesis. 

Para que sea posible utilizar una de 
estas funciones, es preciso definirla pre- 
viamente, Ello implica dos cosas. Por 
una parte, ha de existir en el seno del 
programa una línea que defina la fun- 
ción por medio deí comando DEF FN, 
Otro requisito es que el ordenador co- 
nozca dicha definición. Para ello la eje- 
cución ha de pasar por la susodicha lí- 




Habituaímente, ios intérpretes BASIC permiten ta definición de funciones 
adecuadas para trabajar tanto con datos numéricos como alfanuméncos 
Estas últimas deben unir a su nombre ei símbolo $ 
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ejemplos de definición de funciones. En 
ellos se encuentran funciones no habi- 
tuales en los intérpretes BASIC, así 
como otras de uso frecuente. Cada gru- 
po de funciones puede resultar útil en 
distintos tipos de programa. Y todas 
ellas formarán un «cajón de sastre» o bi- 
blioteca de funciones diversas que con- 
vendrá tener a mano a la hora de poner- 
se a programar. 

La mayor utilidad de las funciones re- 
side en el cálculo de fórmulas matemá- 
ticas. Este es un hecho que vamos a 
considerar en nuestro primer grupo de 
funciones definidas, cuyo ámbito. seré la 
trigonometría. La mayor parte de los tra- 
ductores BASIC disponen de cuatro fun- 
ciones trigonométricas: seno (SIN), co- 
seno (COS), tangente (TAN) y arco tan- 
gente (ATN} r Remitiéndonos a un capí- 
:ulo anterior, vamos a obtener ahora las 
'estantes funciones trigonométricas; las 
:ri meras serán la secante, cosecante y 
cotangente 

K DEF FNSECfXj=1/C0S[X) 

~ DEF FNCSC[X)=1 /SIN(X) 

3: DEF FNCTG(X)=1/TAN(Xj 

La simplicidad de estas tres funciones 
zovia su explicación. Algo más compli- 
isdas resultan las funciones arcoseno y 
ircocoseno. Las fórmulas que las reia- 
::anan con ATN han sido ya comenta- 
os en un capítulo anterior de la obra; 
íSias son: 

»KX)=ATN(X/SQR(1 2» 

-:$X)=Am$QB(1— X'2)/X} 

Su definición como funciones directas 

tiene mayor complicación que la de 
—piar sus fórmulas en un comando DEF 
Aquí está el resultado; 

- DEF FNAS(X}=ATN(X/SQR(1— X*2)j 
S:;ErFNAC(XLATN(SQR(1-X A 2)/X) 

Dtras funciones útiles en numerosas 
nasiones son las hiperbólicas. El seno 
• . DSeno hiperbólico responden a las sí- 
fu. entes fórmulas; 



PROGRAMA 1 

DEF FNA 

DEF FNB 



FNA 



FNB 




Las funciones definidas en un programa pueden ser compartidas por otros 
programas. En consecuencia , para hacer uso de una fundón de esta índole , es 
obligado definirla dentro del mismo programa en el que vaya a ser utilizada. 



DATOS DE ENTRADA 



/uno / 


OTRO 


\OTRO \ 


o 




\ MAS \ 



I I I 
FUNCION 
CON 

VARIOS PARAMETROS 



- L i i i i 



En ocasiones puede ser necesario 
definir funciones con vanos 
parámetros o datos de entrada . 
Este tipo de funciones permiten 
obtener un dato de salida o 
resultado dependiente de vanos 
parámetros. 



J J L 




RESULTADO 



»^EXP|X)~EXP(— X|)/2 

Según estas expresiones, se pueden 
muy fácilmente las funciones que 
calculan: 



60 DEF FN$H|XHEXP(X}— EXP(— X)j/2 
70 DEF FNCH(X)=(EXP(X)tEXP(-X))/2 

Para definir la tangente hiperbólica se 
hará uso del seno y coseno. La tangen- 
te es igual al cociente entre seno y co- 
seno, con lo que su definición se puede 



reducir a una llamada a las funciones 
anteriores. 

80 DEF FNTH(X)=FNSH{X)/FNCH(X) 

Siguiendo con las funciones poco ha- 
bituales vamos a entrar ahora en el 
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campo de los logaritmos. La primera 
función a definir es la que obtendrá di- 
rectamente el logaritmo decimal. La fór- 
mula a aplicar es la siguiente. 

LÜG 10(X)=L0G(X)/L0G(10) 

En ella se hace uso de la función lo- 
garitmo neperiano (LOG) presente en la 
práctica totalidad de ordenadores. Su 
definición se reduce, pues, a la siguien- 
te línea de programa: 

90 DEFFNLOG10(XKOG(X)=LOG(10| 

Una vez que se dispone de la función 
logaritmo decimal nada resulta más fá- 
cil que sintetizar su función inversa: el 
antilogaritmo. El cálculo del antilogarit- 
mo decimal se resume a elevar la base 
10 al dato del que se desea conocer su 
antilogaritmo. Por lo tanto, la función 
que proporcione ese resultado será bien 
fácil de definir, 

100 DEF FNAL10(Xj=1(TX 

Como punto final a esta colección de 
funciones, se ofrece el listado corres- 
pondiente a la definición a las diez nue- 
vas herramientas de cálculo: 

10 DEF FNSEqX)=1/C0S|Xl 
20 DEFFNCSqX|4/SlN<X] 

30' DEF FNCTG(X)=1/TAN(X) 

40 DEF F M ASf X l=ATN(X/$GR( 1 -X * 2 )) 

30 DEF FNAC|X)=ATM|SQR(1— X"2)/X) 

60 DEF FN S H(X)=( EX P(X|— EXP(— X )]/ 2 
70 DEF FNCH(XMEXP(X)+EXPÍ— X)>/2 
80 DEF FNTHÍXt=FNSH(X)/FNCH(X) 

90 DEF FNL0G10(X]=LOG(X)/LOG(10) 

100 DEF FWAL10tX)=10 X 



Funciones no matemáticas 

La definición de funciones no se limi- 
ta a los cálculos matemáticos. También 
es posible la creación de funciones que 
traten con otros tipos de datos. Por 
templo, se puede definir una función 
que extraiga la inicial de una cadena de 
caracteres. Este sería su aspecto: 

"I DEFFNINíS(A$)=LEFT|[A$1J 

E! uso de esta nueva función es simi- 
lar al de cualquier otra función, sea o 




no de tipo matemático. La única salve- 
dad aparece en que ahora se utilizan da- 
tos de cadena de caracteres. Esta cir- 
cunstancia la revela la presencia del 
signo de «dólar» al final del nombre de 
la variable. Como el resultado ha de ser 
un nuevo dato alfanumérico, el nombre 
de la función ha de llevar también ese 
identificador de tipo. 

En ciertos casos pueden incluso mez- 
clarse datos de distinto tipo dentro de 
una misma función. Esto ha de hacerse 
observando la precaución de no aplicar 
funciones numéricas a datos no numé- 
ricos, y viceversa. Veamos un ejemplo. 

La función que sigue sirve para codi- 
ficar mensajes. 

10 DEF FN C0$( A$)=CH R 9[ AS C( A$J+ 2} 

Esta admite un dato alfanumérico 
consistente en una letra, de la que ex- 
trae su correspondiente código ASCII 
(por medio de ASC(A$)). A ese dato nu- 
mérico le suma el valor 2 r alterando su 
código en consecuencia, y entrega como 
dato de salida el carácter asociado al 
nuevo código. En definitiva, la función 
devuelve una letra relacionada con la 
propuesta como dato de entrada. Ello 
puede servir, por ejemplo, para codificar 
mensajes secretos. 

El siguiente programa hace uso de la 
referida función para codificar una pala- 
bra: 



Las funciones sin parámetros 
proporcionan un dato fijo. En 
consecuencia , su resultado será el 
mismo cada vez que sean utilizadas 
dentro del programa. 



10 DEF F N C0$( A$}-CH R $(ASC( AS)+2) 

20 1NPUT l/lENSAJE' r ;M$ 

30 LET Cfc"" 

40 F0R 1=1 T0 mm 
50 C$=C&- F NC 0$[M I D$[M$ l r 1 )) 

60 MEXT I 
70 PflINT C$ 

El mensaje se desglosa en los corres- 
pondientes caracteres; acción ésta que 
realiza la función MID$(M$d,1) de la lí- 
nea 50, A cada carácter se le aplica la 
función predefinida. Proceso que se re- 
pite hasta convertir todos los caracteres 
del mensaje inicial (FOR 1=1 TO 
LEN{M$}). Los sucesivos caracteres co- 
dificados se van almacenando en la va- 
riable alfanumérica C$. A! final, se 
muestra el resultado obtenido en dicha 
variable 

La ejecución de este pequeño progra- 
ma dará el siguiente resultado: 



RUN<CR> 
MENSAJE? PEPE 
RGRG 

I 



En la ejecución se observa como e¡ 
mensaje PEPE se transforma en RGRG. 
Esta clave {u otra parecida) puede ser 
útil para intercambiar mensajes secre- 
tos. 

El programa adecuado para decodifi- 
car tos mensajes en clave coincidirá cor 
el anterior; la única diferencia aparece- 
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TABLA DE CONVERSION 




DEF FN 


Ordenador 

■ 


DEF FN<n>(<p>]=<exp. nunO 


DEF FN<n>(<p>[=<exp. cad > 


DEF FN<n>=>exp.> 


AMSTRAD 


DEF FN<n>(<p>j=<exp r num> 


DEF EM<n>f<p>]-<exp cad> 


DEF FN<n>=<exp.> 


APPLE » (APPLESOFT) 


- 


- 


— 


APRICOT 


DEF FN<n>(<p>)=<exp. num.> 


DEF FN<n>(<p>)=<exp. cad> 


DEF FN<n>=<exp> 


ATARI 


- 


- 


— 


CBM64 


DEF FN<n>(<p>)=<exp. num> 


- 


— 


DRAGON 


DEF FN<n>(<p>J=<exp num > 


- 


— 


EQUIPOS MSX 


DEF FN<n>(<p>)=<exp. rtum.> 


DEF F N<n>(<p>)-<ex p . cad> 


DEF FN<n>=<exp.> 


HP-15Q 


DEF FN<n>[<p>^<exp. num > 


DEF FN<n>(<p>)=<exp. cad> 


DEF FN<n>=<exp> 


8M PC 


DEF Fl\l<n>(<p>)=<exp. num > 


DEF FN<n>(<p>)=<exp. cad> 


DEF FN<n>=<exp> 


MPF 


DEF FN<n>(<p>)=<exp. num > 


- 


— 


NCR DM-V (MS) -BASIC 


DEF FN<n>(<p>)=<exp. num > 


- 


DEF FN<nXexp> 


NEW BRAIN 


DEF FN<n>(<p>)=<exp. num> 


DEF FM<n>[<p>)=<exp. cad > 


DEF FN<nXexp,> 


ORIO 


DEF FN<n>(<p>)=<exp. num > 


— 


— 


SHARP MZ-700 
MZ-BASIC) 


DEF Fl\j<n>(<p>)=<exp. num> 




- 


SINCLAIR QL 


* 


# 


# 


SPECTRAVIDEO 


DEF FN<n>(<p>)=<exp. num > 


DEF FI\Kn>[<p>)=<exp. cad,> 


DEF FN<n>=<exp> 


ZX-SPECTRUItf 


DEF FN<n>{<p>)~<exp . num.> 


DEF F N < n >í<p>)=<exp. cad> 


DEF FN<n>=<exp> 



- >: nombre de la función. <p>: parámetro. <exp. num>: expresión numérica. <exp. cad>: expresión alfanumérica. DEF FN<nXexp.>: definición con 
'jmero de parámetros variable. *: el QL permite definiciones en más de una línea. 



á en Ja función predefinida. La función 
decodificación será la siguiente. 

: DEF FNDE$(A^CHR$[ASC(Aft-2) 

rn ella se realiza la acción contraria. 



La función FNCO$ definida en el I 
:^xto r sirve para codificar mensajes I 
por medio de una clave secreta. ? 




restando dos unidades a cada código 
para restablecer ei código real. 



Funciones sin parámetros 



En determinadas ocasiones se utilizan 
funciones en las que el dato de salida 
es fijo. Por ejemplo, en los equipos que 
no disponen de un comando para el bo- 
rrado de pantalla, éste se puede gene- 
rar por medio de una función: 

10 DEF FMC$(XÍ=CHñ|f26J 
20 PRINT FMCSfOJ 

Esta sería la función adecuada para 
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aquellos casos en los que el borrado de 
pantalla está asociado al código ASCII 
26, Si el código de borrado fuera otro, 
bastaría con cambiar dicho numero. 

Con esta función definida el borrado 
se logrará sin más que teclear PRINT 
FNC$[0). En nuestro ejemplo, el dato de 
entrada o parámetro de la función no in- 
terviene en absoluto; de ahí que no im- 
porte el dato que se incluya, puesto que 
éste no tiene repercusión alguna en la 
función. Realmente, cuando no se ne- 
cesita parámetro de entrada, éste pue- 
de obviarse en la definición. Así pues, ia 
función anterior se puede reducir en su 
expresión: 

10 DEF FNC^CHR$¡26] 

20 PRINT FNCS 

Ahora, él borrado de pantalla resulta- 
rá aún más cómodo: basta con teclear 
PRINT FNC$. 

Las funciones sin parámetros pueden 
utilizarse, por ejemplo, para definir las 
constantes ir (número Pl) o e (número 
«e»). 

Este es precisamente el cometido de 
las dos definiciones que siguen: 

20 DEF FNPi=3.141 592 
30 DEF FNE-EXP(1 ) 



Haciendo uso de la primera, el cálcu- 
lo de la longitud de la circunferida se 
resume a la siguiente función: 

100 DEF FNL(R^2*FNPI*R 



¡Más parámetros! 

Una función puede prescindir de pa- 
rámetros, como ya se ha señalado. No 
obstante, también admite la situación 
opuesta: utilizar más de un parámetro. 
En tal caso, éstos se separan por medio 
de comas, dentro de la zona encerrada 
por paréntesis. 

Las funciones con múltiples paráme- 
tros resultan útiles para programar fór- 
mulas. Por ejemplo, para el cálculo de 
la velocidad media de un móvil partien- 
do del espacio recorrido y el tiempo in- 
vertido: 

100 DEF FNV(E h T)=E/T 

Desde luego, pueden crearse funcio- 
nes bastante más complejas. La que si- 
gue calcula las calorías producidas al 
pasar una corriente eléctrica por un 
conductor (Ley de Joule). 



200 DEF FNCAíR, l,TK24*RT2*T 






En los parámetros se especifican la 
resistencia del conductor (R), la intensi- 
dad de la corriente (I) y el tiempo trans- 
currido (T). 



Ambito de utilización 

Una vez definida una función, ésta 
será accesible durante el resto del pro- 
grama. Per este motivo, es conveniente 
que la ejecución sea por las líneas de 
definición al principio del programa. 
Desde ese preciso instante ya serán uti- 
lizadles. E incluso al detenerse la eje- 
cución del programa puede hacerse uso 
de ellas en modo directo, fuera del pro- 
grama. Ello supone que su definición si- 
gue siendo válida. Sin embargo, las fun- 
ciones definidas dentro de un programa 
no pueden ser utilizadas en otro distin- 
to. La razón se encuentra en el hecho 
de que la ejecución de un comando RUN 
borra tanto las variables como las fun- 
ciones definidas con anterioridad. En 
consecuencia, para que sea posible ha- 
cer uso de las funciones en un segundo 
programa será necesario volver a defi- 
nirlas dentro del nuevo programa. 




DEF FN en el Sinclair QL 

Algunos dialectos BASIC se alejan de la norma en 
ciertos aspectos. Ello puede contribuir a una 
programación más potente, aunque también puede 
resultar más compleja. Este es el caso del BASIC del 
QL El intérprete BASIC del QL (el denominado 
SUPERBASIC) permite una gran flexibilidad en la 
definición de funciones. El primer lugar, éstas no se ven 



limitadas a una línea de programa. Una definición puede 
ocupar varias líneas, siempre y cuando ello se indique, 
Las referidas líneas deben estar encabezadas por una 
en la que aparezcan las palabras reservadas DEF FN. 
Junto a estas dos palabras se sitúan el nombre y los 
habituales parámetros de la función. Las líneas 
siguientes son las que definen el cometido de la 
fundón. Una vez completada la definición, ésta se cierra 
con las palabras END DEF. 

En el interior de la función es posible incluir todo tipo 



de comandos y funciones, incluso bucles de tipo 
FQR/NEXT; y también se pueden definir variables cuyo 
ámbito de utilización se limite a la propia función. 

Estas variables se denominan locales y se identifican 
con el prefijo LOO. 

De los cálculos que se efectúen por medio de una 
función sólo se devolverá un dato como resultado. Para 
indicar el valor de salida que debe proporcionar la 
función se utiliza la partícula REÍ, 

Las funciones definidas en este dialecto gozan de todas 
tas propiedades generales: múltiples parámetros, 
manejo de cadenas, etc. 

Como ejemplo de definición de funciones en este 
curioso dialecto, se incluye una función que calcula el 
factorial de un número (ni =1*2* ... *n), 

10 DEF FN factorial (n) 

20 LQC suma 
30 LET suma=1 
40 FOR 1=1 TO n 
50 suma=suma*l 

60 END FOR n {equivalente a NEXT nj 
70 RET suma 
80 END DEF 




Ai igual que en oíros muchos aspectos , la definición de funciones con el 
super-BASIC del Sinclair QL muestra claras diferencias con respecto al 
procedimiento habitual. 
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El BASIC en 



acción Un alto en el camino 



ste punto es un 
buen momento 
para detenernos y 
proponer un pe- 
queño ejercicio 
que ayude a fijar ideas. Se trata del di- 
seño de un juego muy similar al tradi- 
cional juego de los barcos. 

La superficie de juego es la misma: 
una retícula con cien casillas, con diez 
filas identificadas por las letras que van 
de ¡a A a la J y de diez columnas nume- 
radas del 1 al 10. Dentro de esta super- 
ficie se encuentra escondido el subma- 
rino al que se pretende hundir. Este sub- 
marino no tiene ninguna intención como 
es lógico, de hacernos la tarea fácil. Esa 
es la razón de que durante e! juego se 
esté moviendo sin parar. Por nuestra 
parte disponemos de un sensor bastan- 
te perfeccionado. Este proporcionará 
una medida de la distancia a la que se 
encuentra el submarino tras efectuar el 
lanzamiento de una de las minas. 

En primer lugar, resulta conveniente 
situar en pantalla una referencia para 
conocer los puntos del plano sobre los 
que está permitido lanzar las cargas de 
profundida. Para ello se utilizarán unas 
cabeceras de fila y columna. Las filas se 
distinguirán por las letras que van de la 
A a la J. Por su parte, las columnas se 
identificarán con un número del 1 al 10. 

Para dibujar las cabeceras de las co- 
jmnas es conveniente utilizar un bu- 
lle, lo que proporciona una solución 
oastante elegante. Como cabecera de la 
columna se escribirá el valor que toma 
en cada pasada la variable contadora 
ael siguiente bucle: 

20 FOR 1=1 T0 10 
30 PRINT AT (Q,2*l+5);l;" 

A) NEXT 1 

En el caso de que el ordenador con el 
que se esté trabajando no posea la fun- 
ción AT, el bucle construido puede ser 
sustituido por las siguientes líneas de 
programa: 

20 PRINT SPC(5); FOR 1=1 T0 10 
30 PRINT I;""; 

¿0 NEXT I 

En último extremo, si existiesen aún 
problemas de compatibilidad con el dia- 
lecto BASIC del ordenador que esté uti- 
zando, la rutina podría reducirse a la 
¿■guíente línea de programa: 




Se trata, 

sencillamente, de 
lanzar cargas hasta 
hundir el 

submarino ... ¡Pero 
cuidado! Obtendrá 
mejor puntuación 
el jugador que 
haga blanco en 
menos intentos. 



20 PRINT Jr 1 23455789 10 fJ 

A continuación, hay que proceder a 
colocar los índices de las filas: tarea que 
puede realizarse de la siguiente forma: 

50 PRINT TAB(4]; "A r ‘ 

60 PRINT 

70 PRINT TAB(4); X 
80 PRINT 

90 PRINT TAB(4);T' 

100 PRINT 

110 PRINT TAB(4); r T 
120 PRINT 

130 PRINT TAB(4);'F 
140 PRINT 

150 PRINT TAB(4); T r 
160 PRINT 

170 PRINT TABf4|;T r 
180 PRINT 

190 PRINT TAB(4); "H" 

200 PRINT 

210 PRINT TAB(4); T 
220 PRINT 

230 PRINT TAB(4|; "J" 

Desde luego que la rutina propuesta 
es plenamente eficaz, aunque también 
es cierto que resulta muy pesada de es- 
cribir. Además, ocupa mucha memoria y 
es propensa a que se cometan errores a 
la hora de introducirla. En su lugar, cabe 
pensar en construirla en base a un bu- 
cle, de forma semejante al anterior. En 
este caso, no se pretende escribir un nú- 
mero sino una letra, por lo que la escri- 



tura directa del índice del contador no 
resulta una solución oportuna. Pero, si 
se piensa un poco, se llega a la conclu- 
sión de que estas letras consecutivas 
tienen además unos códigos ASCII tam- 
bién consecutivos. Dichos códigos ASCII 
van de! 65 al 74 y, dado que es posible 
a partir del código ASCII generar el ca- 
rácter correspondiente, lo que haremos 
será utilizar un bucle cuyo valor inicial 
sea 65 (es decir, el códiga ASCII de la 
primera de las letras a representar) y 
como valor final el 74 (código de la úl- 
tima de las letras a representar). 



60 FOR 1=65 TO 74 
70 PRINT 

80 PRINT TAR[4);CHR$(I] 
90 NEXT I 



En pantalla se obtendría el resultado 
que puede observarse en la correspon- 
diente figura. 

Para medir los disparos o intentos de 
abatir el submarino, se utilizará una va- 
riable contadora; variable que es nece- 
sario inicial izar a cero. La instrucción a 
ejecutar para poner el contador a cero 
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123456769 10 
A 
0 
C 
D 
E 
F 
G 
H 
I 

J 

a 



j Pantalla de juego generada por la 
y rutina que se incluye en el texto. 



es la siguiente; por supuesto, en caso 
de que el contador coincida con la va- 
riable K: 

100 LET K=0 

A continuación, y dentro todavía del 
conjunto de instrucciones que só/o se 
ejecutarán una vez al principio del jue- 
go, queda por confeccionar una zona del 
programa que fije la posición de partida 
del submarino de forma aleatoria. 

Aquí se hace necesario el empleo de 
fa instrucción RND en orden a generar 



un número aleatorio. Desde luego, la 
función RND genera un número que en 
principio no servirá de mucho, puesto 
que se tratará de un número compren- 
dido entre 0 y 1, pero sin alcanzar nin- 
guno de estos límites. Por esta razón, se 
hace necesario efectuar un cambio de 
escala, convirtiendo el número genera- 
do en un valor comprendido entre uno y 
diez. La función capaz de obtener un nú- 
mero entre dos limites establecidos 
puede expresarse como sigue: 

Cnúmero deseado>4NT «número de 
po$ibilidades>*RND) + Cvalor mínimo 
del número> 

En este punto hay que hacer la salve- 
dad de que, probablemente, será nece- 
sario sustituir la instrucción RND en 
muchos ordenadores por la variante 
RND{0); ésta es la formulación correcta 
en muchos dialectos BASIC. 

A continuación se entra ya en el jue- 
go propiamente dicho. De entrada hay 
que brindar al jugador la oportunidad de 
realizar su intento. Existen varias for- 
mas de instruir al ordenador para que 
pida al jugador su intento. La más sen- 
cilla consiste en ejecutar un /NPUT en 
el que se pregunte por las coordenadas 
de lanzamiento. Estas se suministrarán 
de forma similar a como se hace en el 
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^^Jlopa ¿d %cq0= 

123456789 ID 



B 



D 



H 



J- 






j 



El juego se 
desarrolla sobre 
una superficie de 
1 00 posiciones o 
casillas; cada una 
de ellas se 
identifica por 
medio de su fila y 
columna , 



tradicional juego de los barcos; esto es, 
mediante una letra y un número. La le- 
tra corresponderá a Ja fila y el número 
a fa columna: 

140 PRINT AT 23,5: JNPUT "DONDE DISPARAS"; A$M 

Como quiera que fa fila ha sido intro- 
ducida mediante una letra, para saber a 
qué fila corresponde exactamente, el or- 
denador se verá obligado a convertir di- 
cha letra en el número correspondien- 
te, Ello supone obtener como resultado 
un número comprendido entre los valo- 
res 65 y 74. El rango del mismo debe es- 
tar situado de 1 a 10, luego basta tan 
sólo con restar 64 af código ASCII obte- 
nido. De esta forma se tendrá perfecta- 
mente definida la fjfa correspondiente ai 
intento. Esta operación se puede reali- 
zar con la instrucción siguiente: 

150 LET N=ASC |A$) — 64 

Una vez efectuado el lanzamiento, 
hay que determinar a qué distancia del 
blanco impacto la mina (evidentemente 
la distancia puede ser cero.,, ¡hundido!). 
La distancia no se medirá en diagonal, 
sino que, al menos en un principio, se 
evaluará de una forma un tanto curiosa 
aunque eficaz. Exactamente, se medirá 
la referida distancia en número de co- 
lumnas desde el blanco al impacto y, 
análogamente, se medirá la separación 
en filas entre ambos puntos considera- 
dos (impacto y posición del submarino). 
Ambos valores se sumarán dando como 
resultado la información que se dará al 
jugador para que perfíle su próximo lan- 
zamiento. 

Sobre el punto de la pantalla al que 
se dirigió el disparo aparecerá indicada 
la distancia a la que se encuentra el 
blanco, A su vez, tras cada andanada, 
se incrementará en una unidad el con- 
tador de lanzamientos efectuados. Todo 
ello es posible programarlo por medio 
de las siguientes instrucciones: 



160 LET D^ABS(M— XJ+ABS(N— Y) 
170 PRINT AT N * 2 M * 2 + 5 ; D 
180 LET K=K +1 



34 




La distancia al submarino viene dada 
como la suma de los valores de la 
diferencia entre la posición de éste y 
el punto de impacto del disparo, 
tanto en sentido horizontal (abasas) 
como en el vertical (ordenadas). 



En el caso de que el ordenador con el 
que se esté trabajando no posea la fun- 
ción AT, la línea 170 puede ser sustituí- 
da por la siguiente: 

'70 <H0ME>:FÜR 1=1 T0 N*2:PRINT:NE)ÍT l:PR!NTTAB(M 

*2+5); D 

<H0IV1E> adoptará en cada caso la 
formulación que corresponda a cada or- 
denador, y cuyo efecto sea llevar al cur- 
sor a la esquina superior izquierda sin 
borrar la pantalla. 

A continuación se inspeccionará la 
distancia entre el blanco y el punto de 
destino del disparo, para determinar si 
ésta es nula (lo cual significará que se 
na acertado en el blanco). Si el disparo 
na dado en el blanco se producirá una 
bifurcación de la rutina final del progra- 
ma. En ella se señala que el juego ha 
:erminado y se muestra el número de 
andanadas que se han disparado. La 
nstrucción necesaria para efectuar tal 
.erificación puede ser la siguiente: 

'90 ID D-Ü THEN GOTO 280 

Si no se ha destruido al enemigo, el 
ordenador moverá el submarino y, de 
esta forma, dificultará la tarea del juga- 
dor. Para desplazar el blanco, la máqui- 
na debe generar un número aleatorio 
comprendido entre -1 y +1 para las co- 
umnas, y otro valor análogo para las fi- 
;as; en función de dichos valores se ac- 
:ualizará la posición del submarino. Las 
siguientes instrucciones realizan esa 
acción: 

230 LEÍ X=Y+INT[3*RND}— 1 
210 LEI Y=Y— INT(3*RND)-1 

Puede darse el caso de que la trayec- 
toria del submarino conduzca a éste fue- 
'3 de los dominios del tablero de juego. 
En tal caso, es preciso corregirla simu- 
lando un rebote contra el límite del ta- 
lero. Las siguientes cuatro instruccio- 



1 23456789 10 

A 
B 
C 
D 
E 
F 
G 
H 
I 

J 



nes se encargarán de corregir la trayec- 
toria: 




D = X1+Y1 



220 IF X-OTHEN X=2 
230 IF X=1 1 THENX-9 
240 IF Y=Q THEN Y=2 
250 IF Y=11 THEN Y=9 



Una vez controlado el movimiento del 
submarino, hay que pasar a atender el 
próximo disparo que realice el jugador. 
Así pues, la secuencia deJ programa ha 
de regresar mediante una instrucción 
GOTO, a la línea 140 en donde se in- 
troducen las nuevas coordenadas de 
disparo: 

260 GOTO 140 

Por último tan sólo queda por cons- 
truir la rutina final. En ella se indicará 
el fin de la partida y el número de in- 



tentos que han sido necesarios para 
hundir el submarino: 

270 CLS 

280 PRINTAT 8,8; "HUNDIDO EN ";K;" INTENTOS" 

290 END 

Y el programa está ya completo, ofre- 
ciendo el aspecto que revela el LISTA- 
DO 1. 

El programa desde luego admite algu- 
nas mejoras. Una de ellas es la de in- 
cluir una rutina al final, que muestre el 
record obtenido hasta el momento por 
las personas que hayan jugado con el 
ordenador durante esa misma sesión. 
También puede incluirse una zona que 
pregunte al usuario sí desea continuar 
jugando. Todo ello puede realizarse por 
medio de la rutina que pasamos e des- 
cribir. 

En primer lugar debe solicitarse el 
nombre de la persona que acaba de ter- 
minar el juego: 

300 INPUT "INTRODUCE TU NOMBREIS 

Dicho nombre queda pues almacena- 
do en la variable de cadena B$. El nom- 
bre del jugador que hasta ese momento 
detente la máxima puntuación estará en 
R$. Las puntuaciones conseguidas se 
encuentran en las variables K (la del úl- 
timo jugador) y K1 (la del jugador que 
obtuvo la máxima puntuación). Para sa- 
ber si el nuevo jugador ha obtenido una 
puntuación superior es necesario proce- 
der a una comparación. En el caso de 
que el record se haya mejorado, se ha- 
rán K1 y R$ iguales a K y B$, respecti- 
vamente. 

310 IFKCK1 THEN LEÍ K1=K:R$=B$ 

A continuación, se visualizará en la 
pantalla el nombre y la puntuación de 
la persona que ostente el record actual: 

320 PRINT ' EL RECORD ES' r ;K1; r POR ",R$ 

Por último, nos encontramos con la 
zona encargada de preguntar al jugador 





RND 


Para obtener la posición 
| inicial del submarina el 
programa hace uso de la 
l función RND , a cuyo 
! resultado se aplica un 
1 cambio de escala. 


0 


0,999 




INT (RND *10) .I 




1 




10 
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si desea realizar una nueva partida. Al 
efecto, debe proyectarse en la pantalla 
el correspondiente mensaje. De ello se 
ocupará Ja instrucción siguiente: 

330 PRINT "QUIERES JUGAR DE NUEVO (S/N)? Jr 

Para recoger la respuesta obtenida se 
utilizará la función INKEY$, asignando 
el valor de la misma a la variable C$. A 
continuación, se comprueba si se ha 
pulsado una tecla antes de continuar el 
proceso. En e! caso de que no se haya 
pulsado tecla alguna, habrá que volver 
a examinar la entrada por el teclado 
hasta obtener una respuesta. 

340 LET C$=INKEY$ 1F Cfc" J ' THEN GOTO 340 

Para determinar si la respuesta es 
afirmativa o negativa entrarán en juego 
instrucciones condicionales. Estas de- 
tendrán el proceso en el caso de que la 
respuesta sea negativa, o bien lo reini- 
ciarán si fuera afirmativa: 

350 JF C$=”S" THEN GOTO 10 
360 IF C$= J ¥ J THEN END 

Si la pulsación detectada no corres- 
ponde con las letras S o N, será preciso 
inspeccionar de nuevo el teclado hasta 
obtener una respuesta correcta: 

370 GOTO 340 

Por lo demás, es necesario añadir una 
línea de programa que inicialice las va- 
riables K1 y R$ con valores nulos para 
comenzar así el proceso. En el caso de 
la variable Kt, es necesario ínicíalizarla 
con un numero relativamente alto, ya 
que la mejor puntuación es, en esta oca- 
sión, la más baja. De inicial izarla a O na- 



VARIABLES UTILIZADAS 
EN EL PROGRAMA 


A$ 


Dato introducido. 


B$ 


Nombre del jugador en curso. 


D 


Distancia ai blanco. 


1 


Indice de bucle. 


K 


Número de intentos. 


K1 


Puntuación record. 


M,N 


Posición del disparo. 


R$ 


Nombre del jugador que obtu- 




vo el récord. 


X,Y 


Posición del submarino. 
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10 CLS 

20 FOR 1*1 TO 10 
25 LOCATE 1, 2*1+5 
30 PRINT I;” " 

40 NEXT I 
50 REM CABECERAS 
60 FOR 1=65 TO 74 
70 PRINT 

00 PRINT T AB ( 4 ) ; CHR $ { I ) 

90 NEXT I 
100 K= 0 

105 REM POSICION DEL SUBMARINO 
110 LET X=INT ( 1 0*RND( 0 ) + 1 ) 

120 LET Y=INT{ 10+RNDÍ 0)+l ) 

130 REM INTRODUCCION DEL INTENTO 

140 LOCATE 23,4: INPUT "DONDE DISPARAS" ; A$ , M 

150 LET N=ASC(A$)-64 

160 LET D=ABS ( M-X ) + ABS ( N- Y ) 

165 LOCATE N*2+l,M*2+5 

170 PRINT D 

160 LET K=K+ 1 

190 IF D=0 THEN GOTO 280 

200 LET X = X+ INT ( 3 *RND ( 0 ) ) - 1 

210 LET Y=Y+INT( 3*RND( 0 ) ) - 1 

220 IF X=0 THEN X=2 

230 IF X=ll THEN X=9 

240 IF Y=0 THEN Y=2 

250 IF Y = 1 1 THEN Y=9 

260 GOTO 140 

270 CLS 

280 LOCATE 0,8: PRINT "HUNDIDO EN ";K;" INTENTOS" 
290 END 



LISTADO l 

En el mismo se han sustituido los comandos PRINT AT por LOCATE /PRINT. Las líneas afectadas son 25/30 t i 40 y 165 



die sería capaz de obtener una mejor 
puntuación, 

5 LET K1=1G00:LET R$=' r " 

En ciertos ordenadores, su intérprete 
BASIC no incluye la función IIMKEY$, lo 



que obligará a recurrir a otro tipo de ins- 
trucciones, Por ejemplo, si estuviera dis- 
ponible el comando GET, habría que 
sustituir la línea 340 por La siguiente: 

340 GET C$IF C$^ "THEN GOTO 340 



Con ello el programa funcionará co- 
rrectamente y sin ninguna diferencia 
respecto al anterior. No obstante, si 
tampoco existiera el referido colando 
en el dialecto BASIC utilizado, se-* a ne- 
cesario recurrir a la instrucc:^- N.PUT. 
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5 K1=1000:R$="" 

10 CLS 

20 FOR 1*1 TO 10 
25 LOCATE 1, 2*1+5 
30 PRINT I;" " 

40 NEXT I 
50 REM CABECERAS 
60 FOR 1=65 TO 74 
70 PRINT 

80 PRINT TAB( 4);CHR$(I ) 

90 NEXT I 
100 K=0 

105 REM POSICION DEL SUBMARINO 
110 LET X=INT (10 *RND( 0 ) + 1 ) 

120 LET Y=INT( 10*RND(0) + 1 ) 

130 REM INTRODUCCION DEL INTENTO 

140 LOCATE 23,4: INPUT "DONDE DISPARAS”; A$,M 

150 LET N=ASC(A$)-64 

160 LET D=ABS{ M-X ) + ABS( N-Y ) 

165 LOCATE N*2+l,M*2+5 

170 PRINT D 

180 LET K=K+ 1 

190 IF D= 0 TREN GOTO 280 

200 LET X=X + INT ( 3 *RND( 0 ) ) - 1 

210 LET Y=Y+INT( 3*RND( 0 ) )-l 

220 IF X=0 TREN X=2 

230 IF X=ll THEN X=9 

240 IF y=0 THEN Y=2 

250 IF Y=ll THEN Y=9 

260 GOTO 140 

270 CLS 

280 LOCATE 8,8: PRINT "HUNDIDO EN K;" INTENTOS” 

290 REM RUTINA FINAL 

300 INPUT "INTRODUCE TU NOMBRE ";B$ 

310 IF K<K1 THEN LET K1=K:R$=B$ 

320 PRINT "EL RECORD ES ";K1;" POR ";R$ 

330 PRINT "QUIERES JUGAR DE NUEVO (S/N)?" 

340 LET C$=INKEY$ : IF C$="" THEN GOTO 340 
350 IF C$="S" THEN GOTO 10 
360 IF C$= "N" THEN END 
370 GOTO 340 



LISTADO 2 

El programa al completo. En el listado adjunto se utilizan de nuevo estructuras LOCATE/PRINT en sustitución 
de los comandos PRINT AT. 



Con ella no basta con pulsar la tecla co- 
rrespondiente a la respuesta, sino que 
además hay que accionar la tecla co- 
rrespondiente al retorno de carro (RE- 
TURN o ENTER} tras introducir el valor 
oportuno. 



340 INPUT C$ 

El listado completo, una vez efectua- 
das estas últimas correcciones, queda- 
rá tal como refleja el LISTADO 2 que 
acompaña al texto. 



Para comprender más fácilmente la 
estructura y funcionamiento del progra- 
ma confeccionado, es interesante exa- 
minar su correspondiente diagrama de 
flujo, el cual se reproduce en la figura 
adjunta. 



38 



Gráficos en 
BASIC 



Introducción al dibujo 
en pantalla desde 
BASIC 



na de las caracte- 
rísticas más rele- 
vantes de los mo- 
dernos ordenado- 
res es su capaci- 
dad para crear gráficos. La representa- 
ción gráfica de datos ayuda a su asimi- 
Jación y a su mejor comprensión. Resul- 
ta más adecuado presentas las ventas 
de una empresa en un gráfico de barras 
que en una lista de números. De esta 
forma es mucho más sencillo observar 
ia trayectoria de un simple vistazo. 

Los gráficos por ordenador son im- 
prescindibles en una larga serie de ac- 
tividades: desde el diseño a los juegos, 
□asando por la educación. En general, 
una buena presentación hace más agra- 
dable el trabajo con el ordenador. Este 
es el motivo por eí cual los fabricantes 
de ordenadores se preocupan cada vez 
mas de las posibilidades gráficas. Los 
más novedosos aparatos incorporan 
unciones impensables hace tan sólo 
unos años. 

Desgraciadamente, la forma de tratar 
as posibilidades gráficas es muy dife- 
rente en cada ordenador. Cada fabrican- 
te ha tratado de mejorar las prestacio- 
nes que ofrecía la competencia, diversi- 
f i candóse así el modo de acometer esta 
materia. A lo largo del presente capítu- 
lo introductorio se seguirá la norma es- 
tablecida por Microsoft; filosofía ésta 
extensiva a un amplio numero de apa- 
ratos. En los restantes casos, los co- 
mandos BASIC se asemejan a los del 
£ ASIC-Microsoft, variando en algunas 
:e sus características. Estas diferencias 
se indicarán a lo largo del texto y en la 
abla de compatibilización que lo acom- 
paña. 




Resolución y modos gráficos 



La característica que más influye en 
= diversidad de formas de crear gráfi- 
cos es el «tamaño» de la pantalla. Las 
mágenes que aparecen en ésta, están 
armadas por un número de líneas ho- 
- tórnales. Cada una de estas líneas, a 
sj vez, agrupa un número limitado de 
rentos. La imagen total se compone por 
r laminación de los puntos adecuados. 




Los gráficos: una de las facultades 
más espectaculares del ordenador 



De ello se deduce que, a mayor canti- 
dad de puntos, mejor definición de la 
imagen. 

El número de puntos que es capaz de 



representar un ordenador se denomina 
«resolución» del mismo. La resolución 
máxima de un aparato se especifica me- 
diante dos cantidades: una representa el 
número de líneas y la otra indica los 
puntos de cada línea. Así, una resolu- 
ción de 1 92x256 significa que se tienen 
192 líneas de 256 puntos. En ese caso 
se dispondría de un número total de 
puntos igual a 491 52 (1 92*256=491 52). 
Estos puntos suelen denominarse tam- 
bién «pixels» (contracción de Plcture 
ElementS). 

Para la representación en pantalla, el 
ordenador hace uso de una parte de la 
memoria en la que se almacena el es- 
tado actual de cada punto. Si la imagen 
se va a representar en blanco y negro, 
se necesitará un bit por pixeL De esta 
forma, el bit a uno indica que el corres- 
pondiente punto está encendido. Un cir- 
cuito específico del ordenador se encar- 
ga de leer la referida memoria de pan- 
talla y trasportar su contenido a la pan- 
talla, Conociendo la ubicación exacta de 
la zona de memoria de pantalla, ésta 
puede ser alterada con eí uso de coman- 
dos POKE. Sin embargo, éste es un mé- 
todo definitivamente arduo y tedioso. En 







MEMORIA 



PANTALLA 



La representación en pantalla ocupa espacio de memoria. En dicho 
espacio se encuentra la información que utiliza el ordenador 
para iluminar los puntos que conforman ia visualización. 
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Una característica a tener muy en 
cuenta a la hora de crear gráficos es 
el tamaño de la pantalla , medido en 
puntos luminosos, con el que trabaja 
el ordenador 



[a mayoría de los casos, dicha alteración 
se ve facilitada por el empleo de los co- 
mandos gráficos del BASIC. Estos co- 
mandos son los que se describen en las 
páginas de este capítulo. 

La necesidad de una zona de memo- 
ria dedicada a la representación en pan- 
talla tiene otras implicaciones. Volva- 
mos al ejemplo anterior. El tamaño de 
pantalla mencionado exige contar con 
49152 bits. Un sencillo cálculo revela 
que ello representa un total de 6144 
bytes (49152/8-6144). O lo que es lo 
mismo, 6144/1024=6 Kbytes. Esta es la 
ocupación de memoria en el caso de uti- 
lizar tan sólo dos colores (blanco=1 H ne- 
gro=0). Si se desean representar más 
colores será necesario contar con más 
memoria. Para cuatro colores no basta- 
rá con un bit por pixel; en tal caso se- 
rán necesarios al menos dos bits por 
cada punto a representar (00=negro, 
01 -rojo, 10=azul y 11=amarilJo, por 
ejemplo). El resultado supone duplicar 
el espacio de memoria de pantalla para 
conservar 3a resolución. Las soluciones 



( A; COORDENADAS ABSOLUTAS (125,90) ) 



t: 



( 0 , 0 ) 



125 






90 



L 



50 

B"cT 



A \ 

(A: COORDENADAS RELATIVAS A'B"MW) 



tomadas por los diseñadores ante este 
problema son diversas. 

En algunos aparatos la resolución y 
la memoria de pantalla son fijas. En 
otros se flexibiliza una de estas carac- 
terísticas para hacer un mejor uso de los 
recursos del aparato. En estos últimos 
casos se puede optar por dos métodos. 
Por una parte se puede aumentar la 
ocupación de memoria cuando se nece- 
site más resolución o más colores. El 



CARACTERES ALFABETICOS 

A B C D E F 



CARACTERES NUMERICOS 

1 2 3 4 5 6 



CARACTERES GRAFICOS 






■ IS1 




Algunos ordenadores poseen un 
repertorio de caracteres gráficos. 
Estos sumirán para crear algunos 
dibujos elementales. 






La identificación de un punto puede 
realizarse especificando sus 
coordenadas absolutas (referidas ai 
origen de coordenadas) o sus 
coordenadas relativas a otro punto 
de la pantalla. 



otro método consiste en asignar un es- 
pacio fijo de memoria y jugar con la re- 
solución y el número de colores. Este 
último implica una relación inversa en- 
tre resolución y colores: a mayor reso- 
lución menos colores disponibles, y vi- 
ceversa. 

El hecho de poder variar las caracte- 
rísticas gráficas del aparato introduce 
un nuevo concepto: los modos gráficos. 
Los ordenadores que permiten al usua- 
rio elegir la resolución adecuada (den- 
tro de unos límites) disponen de varios 
modos de representación o modos grá- 
ficos. El operador puede indicar el modo 
adecuado para la actividad en curso me- 
diante un comando; comando que adop- 
ta formatos muy diferentes dependien- 
do del ordenador en cuestión. De ello se 
hablará más adelante. 



Baja resolución, caracteres 
gráficos 

Se puede considerar como baja reso- 
lución la obtenida mediante el uso de 
caracteres. Al hablar dei comando 
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PR1MT y sus variantes, se subdividió a la 
pantalla en un determinado número de 
líneas y columnas. Estas indican la can- 
tidad de texto representable en pantalla 
a un mismo tiempo. Ambos datos (nú- 
mero de líneas y de columnas) indican 
la «resolución en modo texto». Utilizan- 
do algunos caracteres especiales (como 
pueden ser el asterisco o los signos + 
y -) es posible llegar a construir gráfi- 
cos elementales. Para ello se hará uso 
del comando PRINT AT (LOCATE, u otro 
similar). De esta forma se pueden obte- 
ner gráficos sin mucho detalle. 

Algunos aparatos brindan un reperto- 
rio de caracteres denominados «caracte- 
res gráficos». Estos son bloques espe- 
ciales como cuadrados, líneas, arcos de 
circunferencia... con los que se pueden 
realizar algunos gráficos utilizando el 
mismo método que con los caracteres 
normales. La creación de dibujos con 
estos caracteres gráficos es similar a la 
construcción de una maqueta con pie- 
zas o bloques elementales. Con un poco 
de práctica se pueden realizar algunos 
dibujos, aunque con limitaciones. 



Primeros pasos en alta resolución 

La pantalla de alta resolución se pue- 
de concebir como un mosaico de pun- 
tos. Cada uno de esos diminutos puntos 
es un pixel. Y cada pixel puede ser iden- 
tificado por sus dos coordenadas: verti- 
cal y horizontal. 

El origen de estas coordenadas (el 
punto 0,0) variará de unos aparatos a 
otros. Por lo general, el origen se sitúa 
en una de las esquinas de la parte iz- 
quierda de la pantalla. El BASIC de Mi- 
crosoft utiliza el ángulo superior izquier- 
do (éste será el que se emplee aquí); no 
obstante, será conveniente revisar en el 
manual de cada ordenador para la co- 
rrecta situación de este punto. 

Una vez identificado el origen, el pri- 
mer paso consiste en iluminar uno de 
ios pixels. A tal efecto se hace uso del 
comando PSET (en otros dialectos se 
emplea PLOT). Dicho comando necesi- 
tará las coordenadas para identificar el 
punto a iluminar. Estas se proporcionan 
en su argumento: primero la coordena- 
da horizontal (X) y luego la vertical (Y). 
Este es el aspecto que muestra su for- 
mato: 




I EI cometido del comando PRESET es 
ei de borrar (apagar) puntos de la 
pantalla. 



PUNTO ORIGEN (0,0) 




I Cada punto de la pantalla □ «pixel» 
queda plenamente identificado por 
medio de sus coordenadas. 



(Mumero de línea) PSET (<X>, <Y>) 
[,<color>] 

El tercer dato, suministrado opcional- 
mente, indica el color que ha de tomar 
el punto en cuestión. En aquellos orde- 
nadores que disponen de varios modos 
de representación en pantalla, será ne- 



cesario indicar el modo antes de ejecu- 
tar el comando PSET. Si no se hace así, 
se estará tratando de dibujar en la pan- 
talla de texto, lo que puede producir un 
error de sintaxis. Si al ejecutar un co- 
mando PSET {o PLOT) aparece un men- 
saje de error, ello indicará que hay que 
ejecutar un comando de cambio de 
modo. 




Ilumina el punto de la pantalla indicado por sus coordenadas, 

Formato: PSET [STEP] <X>, <Y>) [ r <color] 

Ejemplos; 10 PSET (1 00,1 50) 

50 PSET STEP (10,-10) 
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I EI comando PSET permite encender 
el punto de la pantalla que desee el 
usuario, sin más que especificar las 
coordenadas del mismo. 



Este pequeño programa enciende 
puntos en lugares aleatorios de la pan- 
talla. Ai ejecutarlo se consigue un bo- 
nito cielo estrellado (si el fondo está en 
negro). Los ordenadores que utilizan va- 
rios modos de presentación gráfica ne- 
cesitarán una línea previa en la que se 
especifique el modo gráfico adecuado. 
En algunos de estos aparatos se vuelve 




Variando el argumento de PSET se 
consiguen dibujar diferentes puntos. 
Siempre hay que prestar atención para 
no exceder los límites de la pantalla. En 
el caso de una pantalla de 1 92x256 pi- 



I EI empleo conjunto de las opciones 
B y F permite crear rectángulos 
sólidos, esto es, rectángulos con toda 
la superficie interna coloreada 



xels r la coordenada X puede variar en- 
tre 0 y 255, mientras que la vertical no 
debe exceder del valor 1 91 . Con la re- 
solución mencionada se puede crear el 
primer programa gráfico. 




PRESET 



Para el trazado rápido de rectas se 
hace uso del comando UNE. En su 
argumento se indican los puntos 
extremos del segmento a dibujar. 



Borra el punto de la pantalla que corresponde a las coordenadas indicadas en su argumento. 

Formato: PRESET ¡STEP] (<X>,<Y>) [,<color>] 

Ejemplos: 20 PRESET (125,1 25) 

70 PRESET STEP (A J A/2J 



a la pantalla de texto al finalizar la eje- 
cución del programa. Ello hará que de- 
saparezcan los dibujos y se permita la 
visualización de caracteres. El programa 
anterior tomaría la siguiente forma en 
el BASIC de Microsoft. 
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: SCREEN 2 
10 CLS 

:: für 1=1 to iooo 

:: PSET ( R N D * 1 9 1 X RND*2 55) 
-J SEXT I 
5ü GOTO 50 




Traza una línea recta o un rectángulo entre los puntos especificados. 



La linea 5 especifica el modo gráfico. 
En este caso se trata del modo de afta 
'“Solución. Eí comando empleado es 
SCREEN, el propio de Microsoft. Para 
-tantener la imagen en pantalla se hace 
..so de la línea 50. Esta evita que se de- 
3^ga la ejecución y se pierda el dibujo. 

Con la ayuda de PSET (Point SET r po- 
~t r punto) se pueden crear dibujos más 
complejos. Por ejemplo, se podría díbu- 
ar una línea; a fin de cuentas, una lí- 
~ea no es más que una sucesión de pun- 
tos. 

El siguiente ejemplo muestra cómo 
-izar una línea horizontal. 



'3 INPUT "ALTl)RA";A 
20 INPUT ir L0NGlTUD";L 
30 SCREEN 2 
m F0R 1=1 T0 L 
5*3 PSET |I,A| 

§0 NEXT I 
70 GOTO 70 



'ara dibujar la línea se ha tomado un 
nr: fijo para la altura. Esta altura indi- 
a coordenada Y de los puntos de la 
^csa, At tratarse de una línea ho rizón - 
"3 todos sus puntos tendrán la misma 
¡coordenada vertical; esta coordenada la 
rtroduce el operador en la línea 10. Eí 
rtro dato que se le pide al usuario es la 
:-gítud del segmento a trazar. Este se- 
;.ndo dato se almacena en la variable 
_ mea 20). Ambos datos han de ser en- 
■3 - os, ya que el ordenador no puede tra- 
bar con fracciones de pixel. Además, 
:= datos proporcionados han de estar 
:: -aprendidos dentro de los límites de 
3 oantalia. De no ser así se produciría 
_r error. 

,as líneas de programa 40, 50 y 60 
=:- as encargadas de representar la lí- 
'33. cuyos extremos coincidirán con los 
;.~ios de coordenadas (1, A) y (L, A), El 



Formato: UNE [(<X1 >,<Y1 >Jj— [STEPK<X2> J <Y2>)[,<color>[ P B[F]B 
Ejemplos: 20 UNE (0 r 0) — (50 r 50) rr B F 




I E¡ comando UNE permite dibujar rectángulos con sólo hacer uso de la opción B. 
En la ilustración se observa un posible resultado. 



bucle FOR es el que se ocupa de incre- 
mentar la coordenada X desde el valor 
inicial al final. 

Se ha visto la forma de iluminar pun- 
tos con PSET (Point SET). Pues bien, 
también existe la posibilidad de borrar- 
los. El comando encargado de esta fun- 
ción es PRESET (Point RESET, borrar 
punto). Su formato es muy parecido al 
de PSET, como puede apreciarse a con- 
tinuación: 

(Número de línea) PRESET {<X>, <Y» 
[,<color>] 



Más líneas... 

Más arriba se ha indicado un método 
para trazar líneas haciendo uso del co- 
mando PSET. Realmente, este método 
resulta superfluo en la mayoría de los 
ordenadores. Por regía general, se dis- 
pone de un comando BASIC que realiza 
ese mismo cometido. En el caso del BA- 
SIC de Microsoft, dicho comando es 
LINE (en otros intérpretes se identifica 
con DRAW). Por medio de LINE se pue- 
den trazar líneas con suma facilidad: 
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(Número de línea) UNE (<punto ini- 
ci a l>) — (<punto fina!>) [,[<coíor>], 

[BJ[F]J 

En las zonas de su formato identifica- 
das como <punto ínícial> y <punto fi- 
na^ se especificarán las coordenadas 
absolutas de ambos puntos. Dichas 
coordenadas se introducen separadas 
por una coma y en el orden habitual; pri- 
mero X y luego Y. 

Entre los restantes parámetros se en- 
cuentra el de color, el cual define el co- 
lor que ha de tomar Ja línea a trazar, El 
color, como se verá más adelante, se es- 
pecífica mediante un número o código. 



Coordenadas absolutas y relativas 

Se ha mencionado que en otros dia- 
lectos BASIC ef trazado de rectas viene 
encomendado al comando DRAW, En la 
mayor parte de ios casos éste utiliza un 
formato similar ai siguiente: 

(Número de línea) DRAW <incremento 
de X>, <incremento de Y> 

En dicho formato llama la atención la 
presencia de tan sólo dos coordenadas. 
Con dos datos, tan sólo se puede espe- 
cificar un punto. El otro punto que defi- 
ne la recta vendrá determinado por el 
comando que se haya ejecutado ante- 
riormente. La filosofía es la siguiente: ei 
último punto trazado servirá de punto de 
partida para el siguiente comando. En 
efecto, el punto siguiente se da especi- 
ficando sus coordenadas relativas al 
punto actual. Ello significa que para de- 
terminar ei punto final no es necesario 




DRAW 52,35 



conocer las coordenadas absolutas del 
mismo (las referidas al origen). Los da- 
tos que se han de suministrar dependen, 
pues, de la distancia al último punto. 
Como ejemplo, se muestra la realiza- 
ción de un cuadrado. Se supondrá que 
el último punto trazado corresponde ai 
de coordenadas 0,0. 



10 DRAW 50,0 
20 DRAW 0,50 
30 DRAW — 50,0 
40 DRAW 0, —50 



Partiendo del punto 0,0 se traza una 
línea horizontal hasta el punto 50,0. 
Para ello se ha de incrementar la coor- 
denada X en cincuenta unidades, dejan- 
do intacta la coordenada Y. Esta es r pre- 
cisamente, la misión de la línea 1 0, Para 
trazar el lado que va hasta el punto 




Traza una línea desde el anterior punto trazado al que se indica en su argumento. 

Formato: DRAWCíncrem. X>,<increm. Y> 

Ejemplos: 20 DRAW 50,50 
70 DRAW LX,LY 



I Para dibujar una línea con el 

comando DRAW, hay que indicar las 
coordenadas relativas al último punto 
trazado. 



Con el uso reiterado de PSET se I 
pueden trazar líneas. Hay que , j 
recordar que, a fin de cuentas, una 1 
línea no es más que una sucesión de J 

puntos. I 




50,50 ha de incrementarse la coordena- 
da Y (que estaba en cero) y mantener ía 
X (que se ha actualizado a 50). Los res- 
tantes fados se trazan aplicando el mis- 
mo método En ellos se aprecia la posi- 
bilidad de dar incrementos negativos, lo 
cual permite acceder a puntos cuya 
coordenadas sean inferiores a las del 
último punto referenciado, 

A la vista del funcionamiento de las 
referencias relativas, cabe deducir que 
dicho método sólo permite trazar figu- 
ras conexas. Nada más lejos de la rea- 
lidad, Se puede modificar la posición del 
último punto referenciado sin por ello 
trazar una recta; tal es et cometido del 
comando PSET (o PLOT en otros dialec- 
tos). Incluso, es posible indicar la situa- 
ción del siguiente punto mediante sus 
coordenadas relativas a la posición ac- 
tual. 

Todo lo comentado es factible en el 
BASIC de Microsoft. La especificación 
de que ei punto se expresa en sus coor- 
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TABLA DE CONVERSION 


Ordenador 


Puntos 

(Coordenadas 

absolutas) 


Puntos 

(Coordenadas 

relativas) 


Borrado 
de puntos 


Rectas 

(Coordenadas 

absolutas) 


Rectángulos 

(Contorno) 


Rectángulos 

(Sólidos) 


Rectas 

(Coordenadas) 

relativas! 


PSET 

(<X>, <Y>) 


PSET STEP 

(<X>, <Y>} 


PRESET 

(<X>,<Y>) 


UNE 

«P,»-«Pj» 


UNE «P t >)- 
(<P 2 »,B 


LINE (<P,>)- 

«p 2 »,bf 


DRAW 

(<X> J <Y>) 


AMSTRAD' 


PLOT 

<X>,<Y> 


PLOTR 

<X>,<Y> 


- 


DñAW 

<X>,<Y> 


- 


- 


DRAWR 

<X>,<Y> 


APPLE 11 
(APPLESOFT) 


HPLOT 

<X>,<Y> 


- 




HPLOT <P,> 
TO<P 2 > 


HPLOT <P¿> 
TCKP a >T0... 2 


- 


- 


APRICÜT 

(M-BA5IC) 


- 


- 


- 


- 


- 


- 


— 


ATARI 


PLOT <X>,<Y> 


- 


- 


DRAWTO <P 2 > 3 


- 


“ 




CBM 64 


- 




— 


- 


- 


- 


- 


DRAGON 


PSET (<X>, 
<Y>,<€> 


- 


PRESET 

«X>,<Y» 


LIME (<P |>) ■ 
«P 3 >) r <a> 


LINE «P,»- 
(<Pj>),<a>,BF 


LIME «P t >|- 
f<P 2 >),<a> H B 


- 


EQUIPOS MSX 


PSET 

(<X>,<Y>) 


PSET STEP 

(<X>,<Y>) 


PRESET 

(<X>,<Y>) 


LINE 

«P,»-«P 2 » 


UNE 

KP 2 >H<p 2 »..b 


UNE«P,>)- 

«p 2 »„bf 


- 


HP-150 




- 


- 


- 


- 


- 


- 


IBM PC 


PSET 

(<X>,<Y>) 


PSET STEP 

(<X>,<Y>) 


PRESET 

(<X>,<Y>) 


UNE 

«P i >) — í<Pa» 


UNE 

«P t >H<P 2 >LB 


UNE |<P,>)- 
«P 2 >)„BF 


- 


HPF 


HPLOT 

<X>,<Y> 


- 


- 


HPLOT <p!> 
TO <P 2 > 


HPLOT <P t > 
TO <P 2 >T0... 2 


- 


, - 


NCR DM-V 
MS-BASIC) 


- 


- 


- 


- 


- 


- 


- 


NEW B RAIN 


- 


- 


- 


- 


- 


- 


- 


ORIC 


- 


- 


- 


— 


- 


- 


DRAW 

<X>,<Y>,<C> 


SHARP MZ-70G 
MZ-BASIC) 


SET 

<X>,<Y> 


— 


RESET 

<X>,<Y> 


- 




- 


- 


SINCLAIR QL 


POINT 

<X> r <Y> 


POINT—R 

<X>,<Y> 


- 


UNE <P,> 
TO <P 2 > 


UNE <P,> 
TO <P 2 > TO... 2 




LINE_R TO 

<X> r <Y> 


SPECTRAVIDEO 


PSET 

(<X>,<Y>) 


PSET STEP 

(<X>,<Y>) 


PRESET 

(<X>,<Y>( 


UNE 

«p,>H<p 2 » 


LINE «P,»- 

«p 2 ».,b 


UNE «P,»- 
l<P|X„BF 


- 


ZX-SPECTRUM 


PLOT 

<X>,<Y> 


— 


- 


- 


- 


- 


DRAW 

<X>,<Y> 



<30; Coordenada horizontal del punto a trazar, <Y>; Coordenada vertical del punto a trazar. <C>: Código del color que ha de tomar el punto. <a>; Adoptará 
:s valores PSET (para trazar) o PRESET (para borrar). <? } > y <P 2 >: Puntos inicial y final de la recta, dados en forma <X>, <Y>. 

Todos los comandos de Amstrad llevan otros dos parámetros relacionados con el color. 

El trazado de rectángulos se realiza por la concatenación de rectas en un mismo comando. 

_a línea se traza desde el último punto referenciado hasta <P 3 >. Este último se dan en coordenadas absolutas. 
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En el texto se explica cómo crear una circunferencia a base de puntos. Los puntos 
se definen por medio de sus coordenadas relativas a! punto central. 



denadas relativas se hace útil liando la 
cláusula STEP. Véase un ejemplo: 



10 UNE— STEP (50,0) 
20 UNE— STEP (0,50) 
30 UNE-STEP H50,0| 
40 LINE-STEP (0,-50) 



La presencia de la palabra STEP de- 
lante de los paréntesis indica que las 
coordenadas que se adjuntan están da- 
das en forma relativa. En el último 
ejemplo propuesto se vuelve a trazar el 
mismo cuadrado confeccionado con las 
rutinas anteriores, 

La partícula STEP se puede emplear 
también con el comando PSET; en cuyo 
caso se tomará como origen el último 
punto trazado, siendo las coordenadas 
que se indiquen relativas a dicho punto. 
Como ejemplo se trazará una circun- 
ferencia; para lo cual es preciso cono- 



cer la expresión de los puntos de la cir- 
cunferencia en función de las coordena- 
das de su centro. Las fórmulas son las 
siguientes: 

X-Xo+R *co$(a) 

Y=Y 0 +R *sen la) 

En donde X 0 e Y 0 son las coordenadas 
del centro, R es la longitud del radio y 
«a» es el ángulo que forma el radio de 
cada punto con la horizontal. Como se 
trata de dibujar la circunferencia com- 
pleta, se hará variar eí ángulo de O a 
360 grados (o de 0 a 2*PI radianes). He 
aquí el programa, 

10 FQR f=0T0 360 
20 PSET (100,100) 

30 PSET— STEP (6Q*COS(l}i60*SIN(l)] 

40 MEXTI 

Si el aparato procesa los ángulos me- 
didos en radianes, la línea 10 habrá de 
sustituirse por la siguiente: 

10 F0R 1=0 T0 6.28 STEP 0.01 

En el ejemplo se ha situado el centro 
de la circunferencia en el punto 
100,100. El radio tomado en este caso 



es de 60 unidades (60 pixels). El coman- 
do de la línea 20 ilumina una y otra vez 
el centro de la circunferencia, lo cual 
permite aí siguiente comando apoyarse 
en dicho punto. De esta forma, los pun- 
tos trazados con eí comando de la línea 
30 vienen referidos al punto central. 



Cuadrados y rectángulos 

Anteriormente se ha utilizado el co- 
mando LÍNE para dibujar un cuadrado. 
En realidad, UNE tiene más posibilida- 
des: las relacionadas con los paráme- 
tros opcionales B y F. El primero de ellos 
permite dibujar rectángulos que tendrán 
siempre sus lados paralelos a los lími- 
tes de la pantalla; esto es, verticales y 
horizontales, pero nunca oblicuos. Para 
trazar una de estas figuras basta con in- 
cluir una B en el argumento del coman- 
do UNE, El rectángulo vendrá definido 
por los dos puntos que se especifiquen; 
puntos que corresponderán a dos vérti- 
ces opuestos de dicho rectángulo. Utili- 
zando esta opción, el cuadrado del 
ejemplo anterior se obtiene con una 
sola línea de programa: 

10 UNE (0,0) — (50,50) hj B 

Las dos comas que preceden al pará- 
metro de B revelan que el color no se 
ha especificado. Para emplear un color 
determinado habrá que especificar su 
correspondiente código entre ambas co- 
mas. 

Existe una posibilidad adicional espe- 
cificada con la opción F. La anterior ha- 
cía referencia a rectángulos (B de Box, 
caja). Esta otra permite rellenarlos {F de 
Fill, rellenar). Para utilizar la opción F 
es necesario trazar un rectángulo, no 
una recta. Con el empleo de BF apare- 
cerá en pantalla un rectángulo sólido. 
Es decir, no sólo se trazará su contorno, 
sino que se rellenará toda su superficie 
con el color indicado. Así pues, el mis- 
mo cuadrado, aunque esta vez relleno, 
se puede crear con la rutina que sigue: 

10 INPUT "COORDENADA X";X 
20 INPUT "COORDENADA Y";Y 
30 SCREEN 2 

40 UNE (X,YJ — STEP [5Q r 50j„RF 
100 GOTO 100 
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La pantalla 
como lienzo 



Gráficos en color 



■ n este capítulo se 
introducen los co- 
mandos adecua- 
dos para el uso del 
color. Junto con 
ellos se presenta eí encargado de trazar 
circunferencias. Todo ello permite la 
creación de los más complejos dibujos 
en la pantalla del ordenador. 



Trazando líneas curvas 

En el capítulo anterior se mostró la 
forma de trazar rectas "punto a punto"; 
método que permite también el trazado 
de circunferencias. Allí se mostraba un 
programa que permitía dibujar una cir- 
cunferencia. 

Sin embargo, en muchos aparatos 
existe un comando BASIC especializado 
en estas labores. Este comando respon- 
de a la palabra clave CIRCLE. 

Para definir una circunferencia basta 
-on dar su centro y su radío. De la mis- 
ma forma, el comando CIRCLE admite 
estos dos datos en su argumento. El pri- 
mero de ellos, el centro, se indica me- 
r ante sus dos coordenadas: horizontal 



y vertical (para localizarlas adecuada- 
mente es preciso conocer la resolución 
que ofrece el aparato y el origen de 
coordenadas que toma). El dato corres- 
pondiente al radio se mide en "pixels" 
o puntos luminosos, siendo por lo tanto 
un número entero. 

En consecuencia, la instrucción BA- 
SIC que produce el trazado de una cir- 
cunferencia de radio 40 y centro en el 
punto 50,50 es la que sigue: 

100 CIRCLE (50,50) r 40 

La formulación elegida es la del BA- 
SIC de Microsoft. Para establecer su 
equivalencia en otros dialectos es con- 
veniente remitirse a Ja tabla de conver- 
sión incluida en estas páginas. 

En la ejecución del comando CIRCLE 
es preciso tener en cuenta las dimen- 
siones de la pantalla. Si durante el tra- 
zado de la circunferencia se exceden los 
límites de ésta, se producirá un error y 
se detendrá la ejecución del programa. 



Arcos de circunferencia 

Las circunferencias no son lo único 
que se puede trazar directamente con el 



comando CIRCLE. Este comando permi- 
te también dibujar arcos, es decir, frag- 
mentos de circunfernecía. Para ello se 
necesitan dos datos más; ios que Indi- 
can el principio y el final del arco. En 
este punto es necesario conocer cómo 
se recorre la circunferencia. 

El comando CIRCLE equivale aí pro- 
grama de trazado "manual" de circun- 
ferencias mostrado en el capítulo ante- 
rior. La circunferencia se va recorriendo 
en sentido contrarío al de las agujas del 
reloj. El punto inicial es el situado más 
a la izquierda; esto es, el que se encuen- 
tra a la misma altura que el centro. En 
la circunferencia entera, el punto final 
coincide con el inicial: se da una vuelta 
completa volviendo al mismo punto. 
Esto es lo que se hace en el ejemplo al 
que nos referimos al variar el contador 
del bucle de O a 6.28 (10 FOR 1=0 TO 
6.28 STEP 0.01 }; donde la cantidad 6.28 
corresponde a 2*tt, que e$ el número de 
radianes que contempla la circunferen- 
cia. Para trazar arcos con el programa 
anterior basta con alterar los valores de 
los límites del comando FOR. De forma 
análoga, se han de indicar los límites en 
el trazado de arcos con CIRCLE. Estos 
dos datos se añaden en el argumento de 
dicho comando e irán precedidos de un 
tercero que indica el color del arco (o de 
la circunferencia completa). A título de 
ejemplo, la siguiente línea traza una cir- 
cunferencia con el color número 3. 

10 CIRCLE (120,751,25,3 

Por el contrario, la línea que se mues- 
tra a continuación sólo presenta la mi- 
tad superior de dicha circunferencia. 

10 CIRCLE (120,75)25,3,0,3.14 

El arco de circunferencia especificado 
va desde los 0 a los 3.14 radianes (de O 
a t t radianes); o lo que es lo mismo, se 
dibuja tan sólo media circunferencia. 
Utilizando estos dos nuevos parámetros 
se pueden construir, pues, toda clase de 
líneas curvas. 



Elipses 

Para trazar elipses con la ayuda del 
comando CIRCLE basta añadir un pará- 
metro más. Este dato se añade al final 
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Dibujo de varias 
elipses 

superpuestas por 
medio del 
comando ClfíCLE. 
Cada una de ellas 
se obtiene 
asignando un 
valor distinto al 
parámetro I. 



de la lista situada en el argumento de 
CIRCLE. El nuevo parámetro proporcio- 
nará circunferencias cuando valga 1 , Si 
su valor es menor que 1, el radio espe- 
cifica la longitud del semieje vertical 
{esto es, del centro al punto más alto de 
la elipse). Cuando valga más de 1, el ra- 
dio indicará el número de pixels que po- 
see el semieje horizontal, 

100 CIRCLE (100,1 001,90,3,,, 2 

En esta línea se muestra un ejemplo 
del trazado de una elipse. Las posicio- 
nes empleadas para los puntos inicial y 
final del arco se han dejado en blanco. 
Esto significa que se dibujará la elipse 



entera. Obsérvese el empleo de las co- 
mas para no confundir la relación del 
aspecto con los límites del arco. 



El color 

Los objetos que se tienen a la vista se 
identifican por su forma y su color. Los 
comandos explicados hasta ahora pro- 
porcionan formas. Es hora, pues, de en- 
trar en el mundo del color de ¡a mano 
del BASIC. 

La forma de programar los colores a 
utilizar en el trazado de gráficos es algo 
muy particular de cada dialecto BASIC. 



Sin embargo, existen tres zonas especí- 
ficas de la pantalla en las que se puede 
emplear el color. Estas corresponden a 
las siguientes: primer plano (o tinta), 
fondo (o papel) y borde. 

Cuando se escribe texto en la panta- 
lla, las letras son de un color distinto al 
del fondo. Las letras se consideran tra- 
zadas en el color de primer plano. El co- 
lor de la pantalla vacía es el color de 
fondo; mientras que el tercer color se 
refiere a la zona que rodea a la zona uti- 
lizadle de la pantalla {en aquellos apa- 
ratos en los que existe dicha zona). 
Existen diferentes métodos para esta- 
blecer el color que va a tomar cada una 
de estas zonas. Como ya es habitual, 
aquí se comentará el método empleado 
por el BASIC de Microsoft; las diferen- 
cias con otros dialectos se muestran en 
la correspondiente tabla de conversión. 

El BASIC de Microsoft utiliza el co- 
mando COLOR para especificar el color 
de cada zona en la pantalla {primer pla- 
no, fondo y borde). No obstante, los co- 
mandos gráficos llevan todos un pará- 
metro que especifica ei color que han 
de utilizar. Esto permite jugar con varios 
colores de primer plano. En resumen, el 
formato general del comando COLOR es 
el siguiente: 

{Número de línea) COLOR [Cprimer pla- 
n o>][ , [<f o n do>][ , <bo rd e>]] 

en donde la ausencia de un parámetro 
revela que la zona afectada no se desea 
modificar. Así, por ejemplo, la siguiente 
sólo variará el color del borde de la pan- 
talla. 

120 COLOR, ,2 

El número de colores disponibles es 
también muy particular de cada máqui- 
na. Los diferentes conjuntos de colores 
pueden variar desde 2 {blanco y negro ¡ 
hasta 256 o más. Por regla general 
cada color utilizable lleva asociado un 
número o código. De esta forma, cada 
color se identifica por medio del respec- 
tivo código. Este es el método puesto en 
práctica en los comandos gráficos co- 
mentados. 

Además de todo esto, en algunos mo- 
delos de ordenadores el número de co- 
lores utilizadles depende del modo grá- 
fico en el que se opere. En cualquier 




Traza circunferencias, arcos de circunferencia y elipses en la pantalla. 

Formato: G I RC LE(<X>,<Y>),<rad> r <col>,<i ni>,<fi n>,<a sp> 

Ejemplos; 10 CIRCLE (100, 100), 95 
50 CIRCLE .(90 r 85) r 7Ü, JrJ 2 
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caso, el número de colores y el código 
de cada uno de ellos debe consultarse 
en las páginas del manual correspon- 
diente. 



Llenando la pantalla de color 

El BASIC de Microsoft dispone de un 
comando cuya función es la de rellenar 
superficies de color. Este comando es 
PAINT (en inglés, pintar). El comando 
PAINT rellena con el color especificado 
una superficie cerrada de la pantalla. 
Para su empleo es preciso delimitar pre* 
viamente la superficie a colorear para 
que ésta quede totalmente cerrada. Ello 
se puede conseguir con el uso de UNE 
y/o CIRCLE. 

Una vez dibujado el contorno basta 
con ejecutar el comando PAINT indican- 
do un punto interior de la superficie. Se- 
gún ia localización del punto especifica- 
do, se rellenará una u otra superficie. 

El empleo de un punto perteneciente 
a la superficie a rellenar es fundamen- 
tal. Sí se traza una circunferencia, se 
puede pintar tanto su interior como la 
parte exterior de la misma. Así pues, el 
punto de referencia identifica unívoca- 
mente la zona de la pantalla que se de- 
sea colorear. Por ejemplo: 



30 GIROLE (100,1001,30,2 
40 PAINT (100,1001,2 



Estas dos líneas trazan una circunfe- 
rencia y la llenan del color número 2. 
Se ha empleado el centro de la circun- 
ferencia como punto de referencia para 
PAINT, pero hubiera valido cualquiera 
de los situados en el interior de la mis- 
ma; por ejemplo: 

40 PAINT (100, 50), 2 

Sí el punto especificado se encuentra 
en la zona externa, ésa será la parte co- 
loreada. Esto mismo es lo que sucede- 




I Ejemplo de trazado de un arco de 
circunferencia por medio dei 
comando CIRCLE. 

ría con la ejecución de la siguiente lí- 
nea: 

40 PAINT (1 20, 100U 

En los tres ejemplos mostrados se ob- 
serva que el color del "relleno" coinci- 
de con el de la circunferencia inicial 
(concretamente con el número 2). Ello 
no se debe a una coincidencia. El co- 
mando PAINT considera como límites 
válidos aquellos trazos que son del mis- 
mo color que el indicado en su argu- 
mento. Si no existen en la pantalla lí- 
neas del color especificado se rellenara 
toda la superficie de la misma. 

Según lo dicho, el formato en el que 
se presenta este comando es el que fi- 
gura a continuación. 

(Número de línea) PAINT (<X>, 
<Y»[,<color>] 




Proporciona el código de color del punto indicado en 

Formato: P0INT[OO,<Y>) 

Ejemplos: 20 PRINT P0INT( 125,24) 

70 LEÍ G0L=P0!NT(1 25,24) 



En donde <X> e <Y> indican las 
coordenadas del punto de referencia. El 
parámetro que especifica el color es op- 
tativo. Como en el resto de los coman- 
dos gráficos, si no se adjunta este pará- 
metro se utilizará el color actual de pri- 
mer plano. 

Como averiguar el color de un 
punto 

Se ha visto la forma de dar color a los 
puntos de la pantalla. Sin embargo, es 
posible que en algún momento se nece- 
site conocer el color de un determinado 
punto. Esto se puede hacer tomando 
buena nota de los puntos que se colo- 
rean. Si se utiliza PAINT para rellenar 
una superficie compleja, el cálculo de 
los puntos afectados puede resultar ex- 
tremadamente arduo. De hecho, la lo- 
calización exacta de los puntos que 
componen una simple circunferencia 
constituye una tarea nada fácil* 

Conocer el estado de un punto lumi- 
noso resulta útil para localizar trazos en 
la pantalla. Una vez localizados, éstos 
pueden ser borrados o emplear el dato 




| El vocabulario de comandos y 
l funciones del ¡eng^a,e 3AS/C facilita 
[ la creación de gráficos en color con 
\ la pantalla como eme. 



su argumento 
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BORDE [border} 
TINTA (ink) 
PAPEL (paper) 



En algunos dialectos 
BASIC es preciso utilizar 
comandos distintos para 
definir el color de las tres 
zonas de la pantalla: 
borde , papel y tinta . 




El comando PAINT permite dar color 
a superficies encerradas por líneas. 



que identifica su situación para poste- 
riores cálculos. En el BASIC cíe Micro- 
soft existe una función que devuelve el 
código de color de un punto dado. Dicha 
función es POINT {no confundir con 
PAINT) y, como es de suponer, admite 
en su argumento las coordenadas de un 
punto de la pantalla. Por ío tanto, su for- 
mato general es el siguiente: 

(Número de línea) [LET] Cvaria- 
b I e>= PO I NT «X>,<Y>) 

En el formato se ha incluido POINT en 
el seno de una sentencia de asignación. 
Al tratarse de una función, POINT debe- 
rá situarse en una expresión numérica 
o donde se pueda hacer uso del dato que 
proporciona. 

Como ejemplo del uso de POINT se 
propone un programa que localiza un 
punto de color 1 en el interior de la lí- 
nea 100 (horizontal) de la pantalla. 

300 FOR M TO 256 




Rellena una superficie con el color especificado. 
Formato: PAINT «X> r <Y>),<color> 



310 IF ROI NT(I,1 00)01 THEN NEXTI 
320 PRINT I 

Se ha supuesto que la pantalla con- 
tiene 256 puntos horizontales {del 1 al 
256). El bucle FOR/NEXT que recorre la 
línea finaliza cuando se encuentra un 
punto de color número 1. En ese mo- 
mento se escribe el valor de i, el cual co- 
rresponde a la coordenada X del punto 
hallado. 

Como se ha indicado, POINT propor- 
ciona el código de color de un punto. 
Además de ello, si el punto rebasa de 
los límites de la pantalla, el valor de- 
vuelto será — 1 . Como los códigos de co- 
lor son siempre números positivos, ef 
valor negativo indica claramente que se 
ha inspeccionado un ponto que no per- 
tenece a la pantalla. Esta posibilidad 
puede emplearse para medir, de una 
forma efectiva, la superficie de la pan- 
talla. El programa que proporciona esta 
información podría codificarse en BASIC 
de la siguiente forma. 

ío rem límites de la pantalla 

20 SCREEN 1 
30 X=Ü 
40 X=X+1 
50 A-PÜINT (X,2] 

60 IF A 0—1 THEN GOTO 40 
70 Y^) 

80 Y=Y+1 
90 A^POINT (2, Y) 

100 IF A O— 1 THEN GOTO 80 
110 SCREEN 0 

120 PRINT "PIXELS: HORIZONTALES" X; "VERTICALES"; Y 
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Ejemplos: 20 PAINT (10,501,3 
70 PAINT [100, 100) 



Sin lugar a dudas t el color es una de 
las características más importantes 
del mundo en que vivimos. 




TABLA DE CONVERSION 




Dibujo 


Color 


Ordenador 


CIRO LE (X,Y), 
R,C,I,F,A 


Arcos 1 


1 

PAINT |X,Y),C 


POINT (X.Y) 


TINTA 


PAPEL 


BORDE 


AMSTRAD 


- 


- 


FILL<c>(9) 


TEST <x>,<y> 


INK <[>,<C> 


PAPER <n> 


BORDE R <n> 


APPLE II 
APPLESOFT) 


- 


- 


- 


- 


HCOLOR (7) 


- 


- 


APRICOT 
ÍM- BASIC) 


- 


- 


- 


- 


- 


- 


- 


ATARI 


- 


- 


~ 


- 


COLOR <n> 


— 


- 


CBM 64 


- 


- 


- 


- 


(8) 


(8) 


— 


DRAGON 


CIRCLE (X,Y), 
R.C.A.I.F 


CIRCLE 


PAINT (X,n 
C r CC (3) 


PPOINT (X,Y) 


COLOR T,P 


— 


EQUIPOS MSX 


CIRCLE {X.Y), 
R,C,I,F,A 


CIRCLE 


PAIMT (X.Y), 
C H CC (3) 


POINT (X,Y) 


COLOR T.P.B 


HP-150 


- 


- 


- 


- 


- 


- 


- 


IBM PC 


CIRCLE (X,Y), 
R,C,I,F,A 


CIRCLE 


PAINT pcn 

C.CC (3) 


POINT (X r Y) 


COLOR T f P r B 




MPF 


- 


— 


- 


- 


HCOLOR (7) 


- 


— 


NCR DM-V 
¡US -BASIC) 


- 


- 


- 


- 


— 


“ 


- 


NEW BRAIN 


- 


- 




- 


- 


- 


t - 


ORIC 


CIRCLE R,C (1) 


- 


FILL lin.Col. 
byte (4) 


POINT (X,Y) (5) 


INK <n> 


PAPER <n> 


- 


SHARP MZ-700 
{MZ BASIC) 


- 


- 


- 


- 


COLOR X.Y.T.P 


SINCLAIR QL 


CIRCLE X,Y,R 


ARC X,,Y, TO X j, 
Y 2 , ANG 


— 


— 


INK <n> 


PAPER <n> 


BORDER <n> 


SPECTRAVIDEQ 


| CIRCLE [X r Y) r 
R r CJ r F,A 


CIRCLE 


PAINT (X,nc 


POINT (X.Y) 


COLOR T.P.B 


ZX-SPECTRUM 


CIRCLE X.Y.R 


DRAW X, Y, ANG (2) 


- 


POINT (X,Y)(6) 


INK <n> 


PAPER <n> 


| BORDER <n> 



X r Y: Coordenadas del centro de la circunferencia o del punto a tratar, R: Radio. C: Color. I: Angulo Inicial del arco F: Angulo final del arco. A. Relación 
de aspecto. ANG: Angulo medido en radianes que corresponde al arco a trazar. T: Código de color de primer plano (tinta). P: Código de color de fondo (papel). 
B: Código de color del borde. 

(1) El color se indica como 0 si es el de fondo ó 1 si es el de primer plano. (2) Actúa como DRAW (ver primer capítulo de gráficos) pero trazando una 
línea curva. La curvatura viene impuesta por el ángulo en radianes a trazar. (3) CC especifica el color del contorno a rellenar. (4) Sirve para rellenar las 
líneas y columnas de la pantalla indicadas con el byte que se adjunta. (5) Devuelve el valor -1 si es color de primer plano y O si es fondo. (6) Proporciona 
el valor 0 si corresponde a «pape!» o si corresponde a tinta. (7) Es una variable que se actualiza con ei código de color en una sentencia de asignación. 
(8) El color se cambia mediante códigos de control en el argumento de PRINT. (9) Sólo en los CPC664 y CPC6128. 



En este ejemplo se crean dos bucles 
que exploran una línea vertical y otra 
horizontal. Al alcanzar ambos límites de 
a pantalla finalizan los bucles. La va- 



riable que sirvió de contador dará la me- 
dida en pixels de cada lado de la panta- 
lla, La línea 110 se utilizará en aquellos 
aparatos que no permítan escribir texto 



en la pantalla de gráficos {SCREEN 2). 
En el ejemplo se ha consideradoo que 
el modo de texto se obtiene por medio 
del comando SCREEN O. 
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Variables de tiempo 



En un capítulo precedente se habló de las variables del 
sistema, o lo que es (o mismo: de posiciones de 
memoria reservadas para uso del sistema. Entre ellas se 
encuentra una variable que puede resultar de utilidad 
en múltiples casos. 

Se trata de una variable cuyo contenido se incrementa 
automáticamente mientras el aparato está encendido 
Por lo tanto, dicha variable puede ser empleada para 
medir el tiempo transcurrido entre dos acontecimientos. 
Muchos dialectos BASIC permiten el acceso directo a 
esta variable, la cual suele estar asociada a la palabra 
clave TIME o TIME$ (en el primer caso se trata de una 
variable numérica). 

Dependiendo del ordenador, esta variable se 
incrementará con mayor o menor frecuencia; por 
ejemplo, es habitual que se incremente en una unidad 
cada sesentavo de segundo. 

La referida variable permite medir el tiempo de 
ejecución de un programa. Por ejemplo, el siguiente 



programa calcula el tiempo invertido por el ordenador 
en ejecutar 10.000 sumas: 



10 LET T=TÍME 
20 FOH 1-1 TO 10000 
30 LET A=B+C 
40 NEXT1 

60 PRINT 60*(TIME— T| 

El valor inicial de TIME es almacenado en la variable T. 
Una vez realizado el proceso, se calcula el tiempo 
transcurrido por medio de una simple resta (TIME— T). Sí 
el ordenador cuenta en sesentavos de segundo, habrá 
que multiplicar la cantidad obtenida por 60, Este es, 
precisamente, el cometido de la línea 50, 

Algunos ordenadores actualizarán el valor de TIME cada 
segundo, lo cual significa que la lectura de esta variable 
vendrá directamente en segundos. En tal caso, la 
multiplicación por sesenta es superfina. 

Cuando la variable de tiempo no es TIME sino T1ME$, Ja 
cosa cambia. El carácter final indica que se trata de 



una variable de cadena. Esta circunstancia impide su 
tratamiento aritmético. Además, TIME$ suele emplear 
un formato del tipo hh:mm;ss< Esto se verá más claro 
con un ejemplo: 

PRIMT TIME$<CR 
0 : 23:35 



Dicha variable puede ser actualizada mediante una 
sentencia de asignación del tipo LET TIME^'1 2.25:30". 
Otros aparatos disponen además de una variable que 
almacena la fecha. Esta última suele estar asociada a la 
palabra DATEft 




Color y texto 

Se ha indicado más arriba que el co- 
mando que controla el color es precisa- 
mente COLOR. Este comando establece 
los colores de primer término, fondo y 
borde. Su acción afecta tanto a gráficos 
como a texto. En el caso del texto los ca- 
racteres se escriben en el color de pri- 
mer plano. 

Un efecto pardal deí cambio de color 
es el que no altera el texto escrito con 
anterioridad. Esto quiere decir que sólo 
se cambiará el color del texto que se es- 
criba a continuación. Esta característica 
permite obtener zonas de la pantalla 
con distinto color de fondo o de primer 
término (o ambos), Así se consigue des- 
tacar uno o varios fragmentos de texto. 




Otras posibilidades utilizables en la 
representación de texto son el vídeo in- 



verso y el parpadeo. El primero se refie- 
re a la permutación del color de papel 
de la tinta. Ello significa que el carácer 
se representará en el color del anterior 
fondo y el fondo en el del anterior pri- 
mer término; esto es, invertidos. El otro 
efecto, el de parpadeo, produce el paso 
repetido de vídeo normal a vídeo inver- 
so, lo que implica una serie de destellos 
que se repetirán con una frecuencia fija. 
Los comandos que controlan estos 
dos efectos, suelen situarse en el argu- 
mento de PRINT; habitualmente se for- 
mulan con las palabras INVERSE y 
FLASH (o similares}. 



Establece el color de primer plano, fondo y borde de la pantalla: 

Formato: COLOR <primer plano>,<fondo>,<borde> 

Ejemplos: 20 COLOR 1,2,2 
70 COLORA 15, 5 
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Macrolenguajes 

gráficos 



Otras formas de 
manejar los gráficos 



n la exposición 
hecha hasta ahora 
sobre los gráficos 
se ha hablado de 
los comandos más 
habituales en BASIC. Sin embargo, en 
las tablas de compatibilización de los 
capítulos precedentes se observan im- 
portantes huecos. Ello no significa que 
los correspondientes aparatos carezcan 
de instrucciones para el manejo de grá- 
ficos. Lo que ocurre es que utilizan otros 
métodos para ese tratamiento. 

Un macrolenguaje viene a ser un sub- 
lenguaje de comandos asociado a una 
palabra clave del BASIC. Los macrolen- 
guajes gráficos suelen emplear coman- 
dos para el desplazamiento del cursor 
de gráficos. Con esos desplazamientos 
se consigue definir el dibujo, por el mé- 
todo de recorrerlo. Algo muy similar a 
la técnica empleada en el denominado 
Turtle Graphics del Logo (véanse los ca- 
pítulos dedicados a este lenguaje). 

De los diferentes macrolenguajes grá- 
ficos, se comenta en estas páginas e! 
propio del dialecto BASIC de Microsoft, 
por ser el más ampliamente utilizado. 



La filosofía del macrolenguaje 

En el BASIC de Microsoft se hace uso 
de un macrolenguaje gráfico asociado a 
ia palabra DRAW. Este comando es el 




o 



0] 



o 



0 ] 



I El macrolenguaje gráfico ; una forma 
de hablar con el ordenador 
de temas pictóricos. 



que nos introduce en el nuevo lenguaje 
de comandos. En cierto modo guarda 
una ligera relación con el otro comando 
DRAW, el comentado en el primer capí- 
tulo de gráficos. Aquél trazaba una rec- 
ta desde el último punto referenciado 
hasta el indicado mediante sus coorde- 
nadas relativas. Es decir, una vez situa- 
das en un punto se saltaba a otro indi- 
cando el incremento que debían sufrir 
ambas coordenadas. Para ello se em- 
pleaban dos enteros que especificaban 
dicho incremento. El nuevo comando 
DRAW también toma como base e! últi- 
mo punto trazado. En su argumento se 
indica la lista de instrucciones del ma- 
crolenguaje que se desean ejecutar. 



IJ "L40U50R70' 

(f) DRAW 




Q Q 



O D 




El comando DRAW da paso a la I 
introducción de una cadena I 
ejecutable que el ordenador convierte I 
en gráficos. B 



Los ordenadores adscritos a ia norma 
MSX poseen el macrolenguaje 
gráfico asociado al comando DRAW 
dentro de su intérprete BASIC. 
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I Los cuatro comandos principales del 
macrofenguaje gráfico permiten el 
movimiento vertical y horizontal l 



I EI trazado de líneas inclinadas se 

encomienda a los subcomandos E r F, 
GyH. 





DRAW "R30 D3Q F30 L30 H15 G15 U30 E15 H15" 

I Realización de un dibujo utilizando 
los subcomandos de desplazamiento 
en las ocho direcciones. 




I Trazado de un cuadrado 
mediante una sencilla 
cadena de instrucciones . 







Los desplazamientos a un punto 
dado por sus coordenadas absolutas 
se realizan haciendo uso del 
comando M. 




i 



El comando M también permite el 
desplazamiento a un punto dado por 
sus coordenadas relativas af último 
punto trazado. 
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El primer paso 



Ya se ha comentado que el comando 
DRAW utiliza como punto de partida el 
ultimo punto trazado. Para iniciar un dí- 
Dujo se puede marcar ese punto inicial 
□oí medio del comando PSET. 

Una vez posicionado el cursor de grá- 
beos se trazarán líneas con DRAW. Para 
ello se emplean cuatro letras del ma- 
crol enguaje: ll(up) arriba, D(down) aba- 
o, L(left) izquierda y R{right) derecha. 
Estas son las cuatro direcciones princi- 
pales de desplazamiento del macrolen- 
guaje. A continuación de cada eomando- 
etra se ha de especificar la magnitud 
del movimiento. Dicha magnitud se 
mide en pixels y será, por lo tanto, un 
número entero. He aquí el primer pro- 
grama que utiliza este macrolenguaje: 




10 SCREEN 2 
20 PSET (100,100) 

30 DRAW "R50D50L5OU5O" 
40 GOTO 40 



En este ejemplo, tras fijar el punto 
' 30,100, se ha desplazado el cursor 50 
: jcels a la derecha, 50 abajo, 50 a la iz- 
uierda y 50 arriba. Todo ello completa 
_n cuadrado de lado 50 cuyo vértice su- 
:erior derecho se encuentra en el pun- 
zo 100,100. Como puede apreciarse en 
eJ listado, las cuatro órdenes de La ca- 
rena ejecutable no se separan entre sí, 
*an contiguas. 

Este programa podría complicarse un 
zoco más empleando los comandos de 
-atamiento de cadenas. El siguiente 
^enripio permite trazar un cuadrado de 
ado variable: 

= IMPUTA 
: SCREEN 2 
r PSET (100,1000) 

30 A$=STR$A) 

-I CS=' r R”M$+"D r, +AfD J TA$+T , +A$+"U Hr +A$ 
a DRAW c$ 

50 GOTO 60 



■ Dirección en la que actuará U con cada 
una de fas cuatro orientaciones postbies. 



Trazando diagonales 

Además de las direcciones horizontal 
y vertical se pueden emplear las que 
forman un ángulo de 45 grados con és- 
tas. Las nuevas direcciones funcionan 
de la misma forma que las anteriores. 
Sus letras identificativas son: E arriba a 
la derecha, F abajo a la derecha, G aba- 
jo a la izquierda y H arriba a la izquier- 
da. Si las anteriores se identificaban por 
coincidir con las iniciales de la palabra 
inglesa, éstas se pueden recordar por 
marcar su orden el movimiento de las 
agujas del reloj. Empleando estas nue- 
vas instrucciones se puede trazar un 
cuadrado apoyado sobre un vértice: 

10 SCREEN 2 
20 PSET (100,100) 

30 DRAW " E50F50G 50H 50" 

40 GOTO 40 

También se puede hacer uso del ma- 
nejo de cadenas para determinar la lon- 
gitud del lado. 

5 INPUTA 
10 SCREEN 2 
20 PSET (100,100) 

30 A$=STR$(A| 

40 C$="E'TA$+'rMíiT'+A$+ r 'D+AÍ+' r H'TA$ 



50 DRAW C$ 

60 GOTO 60 

Teniendo acceso a esas ocho direccio- 
nes se pueden crear figuras relativa- 
mente complejas. Como ejemplo se 
muestra un pequeño programa que tra- 
za el contorno de una pajarita de papel: 

10 SCREEN 2 
20 PSET (100, 100] 

30 DRAW r R30D30F30L30H 1 5G1 5U30E1 5H 1 5 ' 

40 GOTO 40 

Movimiento hacia un punto 
absoluto 

El movimiento visto hasta ahora per- 
mite ocho direcciones de desplazamien- 
to. En la especificación de dicho movi- 
miento se incluye el salto en pixels. Ello 
implica un movimiento relativo al últi- 
mo punto trazado. También puede indi- 
carse el desplazamiento por las coorde- 
nadas absolutas del punto final del tra- 
zo. Ello se consigue con la letra IVI {de 
mover), a la que habrán de adjuntarse 
dos datos: los correspondientes a las 
coordenadas absolutas del punto en 
cuestión. El siguiente ejemplo traza el 
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mismo cuadrado del principio utilizando 
esta nueva posibilidad: 



10 SCREEN 2 
20 PSET (100,100) 

30 DRAW "MI 50.1 00M1 50,1 5DM1Q0, 
150M10O,10Ü rf 
40 GOTO 40 



En este caso se ha supuesto que el 
origen de coordenadas se encuentra, 
como es habitual, en la esquina supe- 
rior izquierda de la pantalla. Si no es así, 
se trazará el cuadrado hacia arriba, en 
lugar de hacia abajo. 

En el ejemplo se pone de manifiesto 
la formulación de esta nueva posibili- 
dad. Tras la letra M se añaden ambas 



coordenadas (horizontal y vertical) sepa- 
radas por una coma. 



Caminando sin dibujar 

Tal como se ha visto hasta ahora, se 
pueden realizar figuras conexas; esto 
es, de un trazo continuo. La forma de 
cambiar de sitio el cursor sin por ello 
trazar una línea parece relegada al em- 
pleo de PSET. No obstante, puede pres- 
cindirse de ese comando. Ello resultará 
útil a fa hora de encadenar varias figu- 
ras en una sola cadena ejecutable. 

La letra B colocada delante de un co- 
mando-letra de movimiento producirá 
un desplazamiento sin trazo. Esta letra 
es la inicial de 4)lank», que en inglés 
significa «en blanco*. Así pues, no es 
preciso anteponer un comando PSET a 



CUADRADO 




I Una mtsma figura se puede 

representar en distintos tamaños; 
para ello basta con cambiar ía escala 
por medio del comando S. 



la ejecución de una cadena gráfica. E 
ejemplo inicial del cuadrado puede re- 
sumirse en una sola cadena. 

10 SCREEN 2 

20 DRAW rJ BM1ÜO r 1OQR5OD5QL50U5O" 

30 GOTO 30 

Como se aprecia en el ejemplo pre^ 
puesto, el prefijo B sólo afecta a la Si- 
guiente instrucción, y no necesita de 
más parámetros. Este prefijo puede ser 
empleado con el resto de comandos- 
letra, permitiendo el trazado de varias fi- 
guras separadas. 



Rotación 

La mayor parte de las veces se desea 
utilizar una figura repetidamente. Pan 
ello se puede almacenar una cadena ge- 
neradora de dicha figura en una varia- 
ble. Si la cadena utiliza comandos rela- 
tivos, ello permitirá situar la figura er 
distintas posiciones de la pantalla. Véa- 
se un ejemplo en el que se dibuja el 
mismo cuadrado en diferentes lugares 

10 SCREEN 2 
20 A$= r 'R40D40L40U4Q' r 
30 DRAW r 'BM20,2Q" 

40 DRAW A$ 

50 DRAW "BM2Q,100" 

60 DRAW A$ 

70 DRAW Jf BM1Q0,2(T 
80 DRAW A$ 

90 DRAW "BM 100,100" 

100 DRAW AS 
200 GOTO 200 

Pero, una vez creada la cadena, ésta 
sólo puede ser reubicada en otro lugar. 
Para alterar su forma se precisa un tra- 
tamiento de la propia cadena. Esto no 
es siempre cierto. Por ejemplo, se pue- 
de especificar una rotación de Ja figura 
creada. Para ello se hace uso de una 
nueva letra-comando. Se trata de la le- 
tra A (de Angulo), que seguida de un nú- 
mero varía la orientación de las instruc- 
ciones que le sigan. 

El comando A admite como argumen- 
to un entero de! O al 3. El cero-indica la 
orientación inicial: el comando U move- 
rá hacia arriba. El resto de números 
marca un ángulo de desfase de 90, 18C 
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TABLA DE CONVERSION 



Ordenador 


Comando 

BASIC 


Subcomandos del macrolenguaje gráfico 


DRAW 


U,R,D,L 


E P F r G,H 


M<h>,<v> 


M+<h>.±<v> 


B r N 


A,S,C 


AMSTRAD 


DRAW 


- 


- 


- 




— 


- 


APPLE II (APPLESOFT] 


- 


- 


- 


- 


- 


- 




APRICOT (M-BASIC) 


- 


- 


- 


- 


- 




- 


ATARI 




- 


- 


- 


“ 


- 


- 


CBN 64 


- 


- 


- 


— 


- 


- 


- 


DRAGON 


DRAW 


U,R,D P L 


E,F,G,H 


M<h>,<v> 


M±<h>,±<v> 


KM 


A r S r C 


EQUIPOS MSX 


DRAW 


U,R,D,L 


E,F,G,H 


M<h>,<v> 


1VI ±<h> H ±<v> 


B,N 


A.S.C 


HP-15Q 


- 


- 


- 


— i 


— 




- 


3N PC 


DRAW 


ü,R r D,L 


E,F,G,H 


M<h>,<v> 


M±<h>,±<v> 


B,N 


A,S,C 


MPF 




~ 


— 


- 


- 


- 


- 


SCR DM-V (MS-BASIC) 


- 


- 


- 


- 


- 


- 


— 


HEWBRAIN 


- 


- 


— 


- 


- 


- 


- 


ORÍC 


- 


- 


- 


— 


- 


- 


- 


HARP M2-700 (MZ-BASIC) 


- 




- 


- 


- 


- 


- 


í NCLA1R QL 


- 


- 


- 


- 


- 


- 


- 


PECTRAVIDEO 


DRAW 


U,R,D r L 


E,F,G,H 


M<h>,<v> 


M±<h> r ±<v> 


R,N 


A.S.G 


ZX-SPECTRUM 


- 


- 


- 


— 


- 


- 





* 270 grados respectivamente. Ello 
: ^ ere decir que tras la ejecución de Al , 
e :omando ü efectuará un movimiento 
- r :ia la derecha de la pantalla, con A2U 
^:/erá hacia abajo, etc. El resto de co- 
mandos relativos variará su dirección de 
r¿que solidariamente con el comando U, 
Esta nueva función gráfica permite re- 
r una misma figura con cuatro orien- 
sc ones distintas. Esto mismo es lo que 
^ realiza en el siguiente programa: 



10 SCREEN2 
20 A$= Jr R40D40L40U40 ,r 
30 DRAW "BMIüMOO" 
40 DRAW A$ 

50 DRAW "Al" 

60 DRAW AS 
70 DRAW "A2" 

80 DRAW A$ 

90 DRAW Jr A3 r ' 

100 DRAW A$ 

200 GOTO 200 



Escala 

El cambio de escala se efectúa me- 
diante el nuevo comando-letra S (de 
Scale). La nueva escala se indica con un 
entero tras la letra S. El entero puede 
variar de 1 a 255, siendo la escala ha- 
bitual la que corresponde a S4. En rea- 
lidad, el factor de escala se obtiene de 
la división del entero propuesto entre 4, 
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El dato así obtenido es el que se multi- 
plicará a las longitudes de trazo especi- 
ficadas. De esta manera, al dividir 4 en- 
tre 4 da como resultado 1 , con /o que la 
escala es la natural (medida en pixels). 
Ello permite reducir la figura hasta cua- 
tro veces (SI de un factor de 1/4) o am- 
pliarle hasta 63 veces (252/4=63). 

A continuación se muestra un ejem- 
plo en el que se trazan cuatro cuadra- 
dos, cada uno en una escala diferente. 
El resultado es el de cuatro cuadrados 
uno dentro de otro. 

10 SCREEN 2 
20 A$=''R40D4ÜL4OU40” 

30 DRAW "BM100, 100” 

40 DRAW A$ 

50 DRAVTSr 
60 DRAW A$ 

70 DRAW "$2" 

80 DRAW A$ 

90 DRAW Hi S3” 

100 DRAW A$ 

200 GOTO 200 




¡Y ahora todo junto / Resultado de la ejecución 
del último ejemplo del texto 



Al igual que el comando A, eí de cam- 
bio de escala S queda fijado hasta que 
se vuelve a indicar una nueva escala. Su 
acción sólo afecta a los comandos de 
desplazamiento relativo, ya que las 
coordenadas no son susceptibles de al- 
teración. 



Color 

Las líneas trazadas hasta el momento 
adoptan el color del primer plano. Color 



que habrá sido estipulado mediante la 
ejecución del apropiado comando CO- 
LOR (véase el capítulo precedente de 
gráficos en color). Si el aparato dispone 
de más colores, éstos se podrán elegir 
en el seno de una cadena ejecutable 
asociada a DRAW. Para ello se emplea 
un nuevo comando-letra. Se trata en 
esta ocasión de la letra C (de Color), la 
cuaf deberá ir seguida del código corres- 
pondiente al pigmento deseado. 



El siguiente ejemplo traza cuatro cua- 
drados, cada uno en un color diferente: 

10 SCREEN 2 
20 A$=' r R40D40L40U40" 

30 DRAW ”BM 20,20” 

35 DRAW ”CÜ” 

40 DRAW A$ 

50 DRAW JH BM20, 100” 

55 DRAW rH Cr 
60 DRAW A$ 

70 DRAW ”BM 100,20” 

75 DRAW T2” 

80 DRAW A$ 

80 DRAW ”BM 100.1 00” 

95 DRAW ”C3' J 
100 DRAW A$ 

200 GOTO 200 

Los códigos correspondientes a cada 
color dependerán del aparato en parti- 
cular. 

A la hora de elegir el color es preciso 
tener en cuenta el color de fondo. Si se 
dibuja un figura en el mismo color que 
el fondo, ésta no será visible. 

Un vez cambiado el color del trazo, 
este permanecerá como color en curso 
hasta que vuelva a cambiar. Paca volver 
al color de primer término inicial puede 
emplearse tanto la opción C como el co- 
mando COLOR. 



Subcomandos del macrolenguaje gráfico del Microsoft 


U<n> 


Mueve el cursor de gráficos n pixels hacía arriba 


D<n> 


Mueve el cursor de gráficos n pixels hacía abajo 


R<n> 


Mueve el cursor de gráficos n pixels hacia la derecha 


L<n> 


Mueve el cursor de gráficos n pixels hacia la izquierda 


E<n> 


Mueve el cursor en la diagonal arriba-derecha 


F<n> 


Mueve e! cursor en la diagonal abajo-derecha 


G<n> 


Mueve el cursor en la diagonal a bajo- izquierda 


H<n> 


Mueve el cursor en la diagonal arriba-izquierda 


M<h>,<v> 


Mueve el cursor al punto de coordenadas absolutas <h> y <v> 


M±<h>,±<v> 


Mueve ei cursor al punto de coordenadas relativas <h> y <v> 


B 


Prefijo que evita que se marque la trayectoria del cursor 


N 


Prefijo que, tras trazar un segmento, deja el cursor en el punto de partida 


A<n> 


Impone una rotación a la figura que se plasme a continuación 


S<n> 


Permite dibujar una figura a escalas diferentes 


C<B> 


Indica el color que ostentarán los siguientes trazos en la pantalla 
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Otras 



herramientas 

gráficas 



Caracteres 
programabas y 
«sprites» 



ntre las posibilida- 
des gráficas co- 
mentadas hasta el 
momento se en- 
cuentran el traza- 
do de rectas y curvas y el manejo de los 
colores. Todo ello se realiza por medio 
de los comandos específ icos de que está 
dotado eí ordenador Otro método para 
crear dibujos reside en el uso de los de- 
nominados caracteres semigráficos. Es- 
ios caracteres especiales permiten plas- 
mar figuras predefinidas a través de un 
comando PRINT. Los caracteres semi- 
gráficos suelen incluir pequeños redon- 
deles y cuadrados de! tamaño de un ca- 
rácter. En el presente capítulo se abor- 
da la redefinición de caracteres y otras 
Herramientas que permiten un uso más 
completo de las posibilidades de la pan- 
talla. 




Los caracteres 

Los caracteres que presenta el orde- 
nador en la pantalla están formados por 
ountos. La disposición de estos puntos 
ca lugar a la «matriz» del carácter. Por 
-egla general, la matriz consiste en un 
cuadrado de ocho por ocho puntos. Cada 
cunto puede estar encendido o apaga- 
do, dando lugar así al carácter a repre- 
sentar. Por ejemplo, el carácter «A» pue- 
de representarse mediante la siguiente 
motriz: 






• • 



• • 






En donde el símbolo «.» significa apa- 
rado y el «•» encendido. Es norma usual 
rajar libres la última fila y columna para 
rué se cree una separación entre carac- 
teres contiguos. Como se puede apre- 
: ar, cada línea tiene ocho puntos. Esto 
quiere decir que cada una de las filas 
rué forman el carácter puede almace- 
narse en un solo byte. Por lo tanto, para 




■ Las técnicas para la definición y tratamiento de sprites permiten crear 

gráficas y controlar su «animación» sobre la pantalla conectada al ordenador 



almacenar la imagen de un carácter se 
necesitan ocho bytes. 

El ordenador no conoce de por sí la 
imagen de cada carácter, y por ello ha 
de tener una zona de memoria dedicada 
al almacenamiento de dichas imágenes. 
Esta zona suele estar localizada en la 
memoria ROM (de sólo lectura) y se de- 
nomina «banco de caracteres». Cuando 
es necesario representar un carácter en 
pantalla, el ordenador busca la imagen 
en el banco de caracteres y la proyecta 
en la posición adecuada de la pantalla. 

De lo señalado se deduce que para 
crear un nuevo juego de caracteres bas- 
taría con variar el contenido de los bytes 
del banco de caracteres. Desafortunada- 
mente esto no es posible, ya que dicho 
banco se encuentra almacenado en 
ROM (la zana de memoria cuyo conte- 
nido no es posible alterar). De todas for- 



mas existen «trucos» para solventa- ese 
problema. 



Programando caracteres 

Supongamos por un momenic a 
banco de caracteres se encont-ara er 
memoria RAM (memoria cuyo cc* - 
do sí puede ser alterado). En ta 
para cambiar un carácter basta- .= co~ 
«encender» o «apagar» los bits opc-unos 
de las posiciones de memoria e^ =s 
se encuentra almacenado el cara:: a' =r 
cuestión. 

El comando BASIC que perm :a e ex- 
ceso a posiciones individuales ce — e- 
moria es POKE, comando que es 0c - 
cade en profundidad en el capi:„ : I- 
BASIC al código máquina» de esta — s- 
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Para que sea posible alterar el 
repertorio de caracteres, éste ha de 
ser previamente trasladado de 
memoria ROM a RAM. 



mo tomo. El uso de POKE no facilita el 
acceso a cada bit individualmente, sino 
al byte en conjunto. Ello obliga al cam- 
bio de una fila completa de la matriz del 
carácter. 

El siguiente paso consiste en identifi- 
car el efecto que produce el almacena- 
miento de un entero en una de estas po- 
siciones de memoria. La cosa no puedfe 
ser más sencilla: ía sucesión de ceros y 
unos (bits apagados o encendidos) de 
cada fila se corresponde con el entero 



introducido, pero escrito en el sistema 
binario. Por ejemplo, el almacenamien- 
to del número 9 en una de esas posicio- 
nes produciría una línea de este tipo: 

Ello se debe a que la configuración bi- 
naria 00001001 (o más sencillamente 
1001) corresponde al número decimal 
9, Así pues, conociendo el paso de bi- 
nario a decimal se puede alterar la ima- 
gen de un carácter sin más que ejecu- 
tar los adecuados POKES. 

Para aclarar algo más las ideas se va 
a mostrar un ejemplo de lo anteriormen- 
te mencionado. Se parte de la base de 
que los caracteres se encuentran en 
RAM, El carácter a alterar es el «A», que 
por comodidad supondremos situado en 
la posición número 1000, Las posicio- 
nes de memoria que interesan son las 
siguientes: 

1000 
1001 
1002 • 

1003 • •. 

1004 

1005 • *. 

1006 • •. 

1007 . . 

Tras el cambio, se desea que el carác- 
ter adquiera el siguiente aspecto: 



1000 , 

1001 

1 002 * • , 

1 003 * • , 

1 004 ••••••• 

1005 • •. 

1006 * • , 

1007 

Es decir, sólo se alterarán las tres pri- 
meras filas. El paso siguiente consiste 
en calcular los números decimales que 
corresponden a los binarios 01111100 
y 10000010. Para eílo emplearemos 
una sencilla regla: a cada «uno» que 
aparece en el número binario se le asig- 
na una cantidad dependiendo de la po- 
sición en la que se encuentra; luego, 
basta con sumar esas cantidades pare 
obtener el valor decimal. Las cantidades 
claves coinciden con las ocho primeras 
potencias de 2, Contando de derecha a 
izquierda, los respectivos unos valen 1, 
2, 4, 8, 1 6, 32, 64 y 1 28, De esta forma, 
el número 01111100 vale 
4+8+16+32+64=124 y el 10000010 
vale 2 + 128 = 130: ios valores decimales 
124 y 130, respectivamente. 

Tras este sencillo cálculo sólo quede 
por almacenar los datos calculados en 
las posiciones adecuadas. Esto ultime 
se realiza por medio del comando POKE. 
Estas serían las instrucciones oportu- 
nas: 



A 

<X 



y 

B C D E 



A |( ¿ c 



Un nuevo método para 
confeccionar dibujos 
bajo el control del 
BASIC consiste en 
alterar la forma de ios 
caracteres que integran 
el repertorio del 
ordenador 
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=OKE 1000,124 
WE 1001,130 
=0KE 1002,130 



Reubicación del banco de 
:aracteres 

Anteriormente se habló de la irnposn 
rrtídad de variar la imagen de los carac- 
hes contenidos en ROM. No obstante, 
□uede realizarse un «truco» que permite 
evar a cabo la alteración de los carac- 
hes. Para ello es necesario conocer 
sigo más acerca del interior de la má- 
quina. 

El banco de caracteres se encuentra 
situado a partir de una determinada po- 
sición de memoria. El ordenador accede 
i la imagen de cada carácter sumando 
al número que indica esa posición ini- 
: alia distancia que separa a fa imagen 
:e esa primera posición. 

Por ejemplo, sea N la primera posición 
:el banco de caracteres. Para acceder al 
:nmer carácter se suma N + 0 dando lu- 
:ar a la posición primera de ese carác- 
ter. Para el segundo, se ha de calcular 
(ya que las 8 primeras posiciones 
htenecen al primero). En general, para 
leterminar la posición del carácter nú- 
mero X se ha de calcular N+{8 *X). 

El número que indica el inicio del ban- 
:o de caracteres (el denominado N) sue- 
e estar almacenado en una de las va- 
ables del sistema. Estas se encuentran 
i- RAM y, por lo tanto, es posible alte- 
rarlas. Una vez identificada la variable 
tel sistema que contiene esa informa- 
: ón, ésta se puede modificar por el uso 
:el comando POKE. Sí se altera esa va- 
* able, el ordenador buscará las imáge- 
nes de los caracteres en otro lugar de 
a memoria, lo que proporcionará unas 
-ágenes completamente aleatorias de 
:s mismos. Ello puede remediarse, cía- 
está; e incluso aprovechar esta posi- 
: dad para nuestro objetivo, cual es 
-odificar el repertorio de caracteres del 
andenador. 

p ara hacer un uso provechoso de la 
herida variable del sistema, es conve- 
-ente que a partir de la dirección intro- 
ducida en ella exista una copia del ban- 
: : de caracteres. Los pasos a seguir son 
m siguientes: identificar una posición 
3 e memoria que sea propicia, copiar el 




BANCO 




BANCO 




ORIGINAL 


1 


ORIGINAL 






▼ 

/reub^X 1 

CADOR / 










COPIA DEL 
BANCO 





£7 programa reubicador descrito en el texto permite efectuar una copia del banco 
de caracteres en otra zona de memoria. 
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1_30 LINE ( 7,7 )_-( 248, 168 ), ,B 



1PPINES 144 A 

r 

SN76477N 









1 :Y1 = 1 
ZACION 
F B$ = M 



ÍN X = X-C 





0 LOCATE Y1 + 1 , X 1+1 
230 PRINT " " 




banco cíe caracteres a partir de dicha po- 
sición y alterar al contenido de la varia- 
ble del sistema para que apunte a ; 
nueva dirección. 

El primer paso revela que no vae 
cualquier dirección. Ello se debe a = 
longitud del banco de caracteres. Si e 
ordenador dispone de un repertorio de 
125 caracteres, el banco ocupara 
125*8=1 024 bytes (ocho bytes por caái 
carácter). Para copiar el banco se nece- 
sitará, pues, una zona de 1024 bytes li- 
bres. Esto significa que la nueva posi- 
ción de memoria debe estar al comien- 
zo de una zona RAM de 1024 bytes, 
que la alteración de dichos bytes o: 
debe producir ningún efecto desastroso 
(desde luego, dicha zona no debe coin- 
cidir con Ja destinada al almacenamter 
to del programa, a las variables del sis- 
tema, etc.). 

Una vez determinada la posición cte 
memoria idónea, habrá que situar a par- 
tir de ella las imágenes de los caracte- 
res. Esto último se puede realizar por 
medio de un programa BASIC, En rea* - 
dad, lo único que ha de hacer el progra- 
ma es copiar el contenido de unas pc- 
siciones de memoria en otras, A conti- 
nuación se muestra una posible rutina 
adecuada para copiar del banco de ca- 
racteres. 



El fundamento técnico que otorga a cualquier equipo 
doméstico sus amplias y versa files facultades 
gráficas , $e encuentra en los «chips». 




Algunos ordenadores disponen de un 
fuego de caracteres semigráficos que 
permiten realizar dibujos sencillos , 



10 REM REUB1CADÜR DE CARACTERES 
20 INPUT "POSICION ORIGINAL rH ;PO 
30 INPUT "NUEVA PGSIC10N';NP 
40 F0R 1=0 T0 1023 
50 P0KE NPHPEEK[PÜ+!| 

60 NEXT I 

Tras la ejecución de esta rutina se dis- 
pondrá de un juego de caracteres alter- 
nativo a partir de la posición de memc- 
ria introducida como respuesta al co- 
mando INPUT de la línea 30. El bucle 
FOR hace variar a I de 0 a 1023, Cor 
ello, la expresión PO+I recorre los 102- 
bytes del banco de caracteres. La fun- 
ción PEEK proporciona el contenido de 
cada una de esas posiciones de memo- 
ria, valor este que se deposita en la co- 
rrespondiente nueva posición NP+t me- 
díante el comando POKE de la línea 50 

Inmediatamente después de la ejecu- 
ción de ía rutina reubicadora se puede 
cambiar el contenido de la variable de 
sistema por el valor de la nueva pos - 
ción. Ello permite conmutar el banco 
antiguo por el nuevo. La reubicación * 
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posterior conmutación de bancos da 
como resultado un nuevo banco de ca- 
racteres en RAM. O lo que es lo mismo; 
un banco de caracteres alterables. La 
programación de dichos caracteres pue- 
de ya efectuarse siguiendo las normas 
comentadas en los anteriores párrafos. 



Uso de ios caracteres 
programados 

En algunos ordenadores resulta ocio- 
so el método de la reubícación del ban- 
co de caracteres. Ello se debe a que en 
algunos aparatos (como es el caso del 
Spectrum de Sinclair) una parte de los 
caracteres se almacena en memoria 
RAM. Con esto se permite su fácil pro- 
gramación por parte del usuario. El mé- 
:odo a seguir para alterar esos caracte- 
res es idéntico al que se utiliza tras eí 
oroceso habitual de la re ubicación. 

Los caracteres programados son fácil- 
mente útil iza bles, sin más que introdu- 
cirlos en el argumento de un comando 
D RlíMT. Esto permite posicíonarlos en 
cualquier lugar de la pantalla. También 
es posible su movimiento, por el m ¿to- 
co de ir imprimiéndolos en posiciones 
sucesivas de Ja pantalla. 

Por regla general, los caracteres pro- 
jamados se agrupan para formar una 
■ gura mayor. En ese caso, cada carác- 
:bt contendrá sólo una parte de la figu- 





La forma de cada 
carácter está en 
correspondencia 
con un determinado 
/ número de unos y ceros 
almacenados en memoria. 



ra final. A la hora de su representación, 
las distintas partes se sitúan contiguas 
en el argumento de PRINT. Si las cuatro 
cuartas partes del dibujo de una cara se 
almacenan en los caracteres A, B, C y 
D, podrían utilizarse las dos líneas 
PRINT que siguen para visualizar correc- 
tamente el resultado: 

10 PRINT "AB' r 
20 PRINT TD rJ 

Para situar el dibujo en cualquier pun- 
to de la pantalla se hace uso de la op- 



I Una posible aplicación de los 

caracteres definibles es la creac : n 
de caracteres especiales no 
existentes en el repertorio ong. na ce 
ordenador; tal es el caso de s ^ ce 
castellano. 



ción AT asociada al comando P- z 
del comando LOCATE en su caso). 

Si se tienen los valores que ind car a 
fila y la columna en las variables * * : 
respectivamente, puede empiece a 
siguiente rutina posicionadora: 

100 PRINT AT(X,YJ; "AB' r 
110 PRINT AT|X,Y+1);' H CB" 



Sprites 




Cada fila de un carácter ocupa una posición de memoria , En consecuencia , un 
carácter completo neceóte 8 bytes de memoria para su almacenamiento. 



La redefinición o programacic* :v 
racteres permite crear y utiliza' :r* 
cilidad figuras móviles. Sin en Da-pz 
esta técnica tiene sus limitaciones = 
de ellas es el hecho de que ur cara*— ^ 
sólo puede situarse en la interseca 
de una fila y una columna de texiz rr: 
hace que el movimiento más 
sible se realice en saltos de oc~ : 
(anchura de cada carácter). 

Para solventar este y otros proc 
en los más modernos ordenaa-'-s se 
hace uso de una nueva posibM :s: :s 
denominados «sprites». 

Un spríte no es más que un cañe: a 
programare mejorado, Estre esas -me- 
joras cabe destacar la posibilidad ce “ i- 
vimiento pixel a pixel y la detece o r ^ 
colisiones. 

El dialecto BASIC que mejor r: ri 
esta característica es el de Micr:s:^_ e 




■ La agrupación de vanos caracteres puede utilizarse para 
construir dibujos de mayores proporciones. 



cual equipa a los ordenadores de tipo 
M3X, Ese será pues el que se comente 
brevemente en estas páginas. 

La definición de la forma de un sprite 
es idéntica a la definición de un carác- 
ter en !o que se refiere a la transición 
pixels-bits. Sin embargo, en el BASIC de 
M icrosoft esos bytes no se han de alma- 
cenar directamente en la posición de 
memoria, sino en una variable alfanu- 



mérica. Dicha variable alfanumérica se 
corresponde con uno de los elementos 
del array SPR1TE$( ). Cada elemento, 
desde SPRITE $(0) hasta SPR!TE$(255), 
almacena una imagen. El siguiente es 
un ejemplo válido de definición de un 
sprite: 

10 FOR 1=0 T0 7 

20 READ A$ 



30 B$=B$frCH R$(\/ AL( r ‘ 8iB N + A$) 
40 NEXTt 
50 SPRITE$[0)-B$ 

1000 DATA 001 11 100 
1010 DATA 01111110 
1020 DATA 11011011 
1030 DATA 11011011 
1040 DATA 11111111 
1050 DATA 00111100 
1060 DATA 01 0000 1 0 
1070 DATA 1Ü000001 



PRINT AT (20,30); 



20 


i } ' J 












30 




* 






















J 



■ Para utilizar en la pantalla los caracteres definidos 
t basta con hacer uso del comando PRINT. 



Este método tan exótico es el que se 
jtilizá para la creación de sprites. La for 
na se define a base de un bloque de ins- 
:rucc iones DATA. Estos datos se convier- 
:en al formato adecuado por medio de 
serie de funciones CHR$(VAL( r '&B"+ 
aplicadas a la ristra de unos y ceros qte 
definen las filas del sprite. La informa- 
ción de las diferentes filas se concate- 
na {+) en la variable B$y ésta se guard- 
posteriormente en SPRITE$> creándose 
así el sprite. 

Una vez definido, el sprite puede ser 
ubicado en cualquier parte de la panta- 
lla mediante el comando PUT SPRITE 
Este comando admite en su argumen 
el número del sprite a representar ( 
el ejemplo es el sprite número ce 
acompañado de las coordenadas {er 
alta resolución) que señalan* su po 
ción. Otro dato aportable es el color 
sprite. 






Introducción al 

sonido 



Generación de 
sonidos con el 
ordenador 



a revolución mi- 
croínformática es 
un hecho incon- 
testable. En los 
últimos años esta- 
mos asistiendo a una asombrosa proli- 
feración de microordenadores. Una ava- 
jancha de equipos cuyo objetivo no es 
tan sólo el de automatizar aplicaciones 
que podríamos llamar «profesionales» o 
^serias». Hoy en día, e! ordenador tam- 
bién se está convirtíendo en un electro- 
doméstico habitual en muchos hogares. 

El éxito de los ordenadores domésti- 
cos se debe a varios factores. En primer 
fugar, al convencimiento de que el fu- 
turo está en los ordenadores y es nece- 
sario familiarizarse con ellos para no 
quedar descolgado. En segundo lugar 
están las aplicaciones informáticas que 
podríamos llamar «menores»: llevar pe- 
queñas contabilidades, procesar textos, 
aplicaciones educativas y muchas otras. 
Por último, y con una importancia capi- 
tal se encuentran los juegos. En gran 
medida, estos pequeños ordenadores 
han sustituido a las consolas de video- 
juegos y a otros divertímentos como ins- 
trumentos de ocio y diversión para ma- 
yores y pequeños. 

Definiendo términos 

Al igual que sucede con otras carac- 
terísticas inherentes a los equipos infor- 
máticos, también en lo relativo al soni- 
do existe una gran confusión, sobre todo 
por lo que a terminología se refiere. En 
los próximos párrafos se describirán al- 
gunos de los conceptos claves cuyo co- 
nocimiento resulta imprescindible para 
el programador. 

¿Qué es el sonido? La respuesta no es 
difícil: se trata de perturbaciones que se 
propagan a través del aire y que nues- 
tro oído es capaz de detectar. Estas per- 
turbaciones se pueden crear de muy di- 
-ersas formas: por medios mecánicos, 
cor nuestra voz... y también por medios 
electrónicos. Para lograr tal objetivo, los 
especialistas emplearon unos circuitos 
electrónicos llamados osciladores, ca- 
oaces de generar ondas de una determi- 
nada frecuencia; ondas que se harán 
audibles al reproducirlas a través de un 
altavoz. 

Cuando estas ondas se encuentran 



dentro de la gama de frecuencias audi- 
ble por el ser humano, se convierte en 
lo que llámanos sonido. 

La frecuencia, como se puede apre- 
ciar, es uno de los parámetros más im- 
portantes de una onda. Se trata de una 
medida de la velocidad a la que se pro- 
ducen las variaciones de esa perturba- 
ción. Sin embargo, estas ondas no sólo 
se caracterizan por su frecuencia, sino 
también por otros factores como son la 
forma de la onda, su amplitud y la po- 
tencia de la misma. 

¿Qué significa que un ordenador po- 
sea tres canales de sonido y uno adicio- 
nal de ruido? Definamos en primer lu- 
gar qué se entiende por canal. 

Un canal de sonido se refiere a una 
fuente sonora; de tal forma que un or- 
denador con tres canales de sonido po- 
seerá tres fuentes emisoras de sonido. 
Ello no quiere decir que posea tres al- 
tavoces, sino que el sonido se genera 
mediante tres osciladores, cuyas sali- 



daSj luego, son mezcladas y enviadas, 
por lo general, a un solo altavoz. El ra- 
nal de ruido se concreta en otro : = : e- 
dor que genera una serie de ondas 3 ^ - 
que esta vez de una forma un taris pe- 
culiar. Este último resulta adecuaos 
para crear sonidos efectistas lo vi- 
driamos denominar efectos espec 3 es 
Dentro del dispositivo que procure e 
sonido es preciso distinguir eos rs"er 
fundamentales: los osciladores re- 
producen el sonido, y los amp ~ oeoi'es 
y altavoces que lo acondiciona :r- 
que seamos capaces de oírio 

Hay ordenadores que en su -:e- : '- 

cluyen ambas cosas; pero tar: s- re 
hay que prescinden de la seguirá r:~3 
En este último caso, el somee se ;r: e 
ne aprovechando los amp ' car: es * 
altavoces del televisor o mon idt :: --si- 
tado al equipo. Al efecto, la ss"a :_s 
el ordenador envía al tele. sc r se 
sólo la de vídeo, sino tambié^ 3 is a: 
nido. 




Diagrama de 
bloques de los 
circuitos 
habituaimente 
encargados de ía 
generación de 
sonidos en el 
ordenador. 






Distintas formas o patrones de la 
envolvente de volumen que pueden 
utilizarse para ta síntesis de sonidos 
especiales. 

Respecto a la reproducción final del 
sonido cabe puntualizar algunos deta- 
lles de interés* 

Para empezar, los altavoces que sue- 
len incorporar los ordenadores son ge- 
neralmente pequeños y emiten un soni- 
do de poca importancia. Además, este 
sonido no suele ser regulable; esto es: 
no se puede ajustar el volumen del mis- 
mo una vez que éste ha sido programa- 
do, En los ordenadores que aprovechen 
el amplificador y el altavoz del televisor 
o monitor externo, la cosa cambia; és- 
tos poseen, por lo general, un mando 
para controlar el volumen, mando que 
el usuario puede regular a voluntad. 

La diferencia fundamental, de todas for- 
mas, reside en la calidad. En el caso de 




que sonido se obtenga a través del re- 
ceptor de TV, tiene lugar toda una serie 
de procesos de codificación y decodifi- 
cación de la información sonora que ha- 
cen que el sonido resudante pierda ca- 
lidad. También existen ordenadores que 
disponen de salidas para equipos de alta 
fidelidad {a veces en estereofonía) de los 
cuales cabe esperar un sonido excelente. 

Son muchos los términos del lengua- 
je musical que se emplean en el campo 
de los ordenadores. Por ejemplo, una 
nota es un sonido de una determinada 
frecuencia. A su vez, una octava es un 
conjunto de frecuencias. Cuando se dice 
que un ordenador tiene más octavas que 
otro, se está indicando que el rango de 
frecuencias en el que puede trabajar es 
más amplio. Las notas musicales que 
caben dentro de una octava son esen- 
cialmente siete; aunque, de hecho, es- 
tas notas admiten variantes de tal for- 
ma que dentro de una octava hay en rea- 
lidad más de siete sonidos. Por lo gene- 
ral, para emitir una determinada nota 
hay que indicar a la máquina de qué 
nota se trata y en qué octava se encuen- 

i 




En un ordenador, el nivel de volumen 
del sonido es regulable en sucesivos 
«escalones* o saltos de forma digital l 



tra. El nombre de la nota será el mismo 
en cualquiera de las octavas, depende 
tan sólo de su posición relativa dentro 
de la misma. 

Hay que tener en cuenta otro detalle 
de importancia a la hora de leer el ma- 
nual que acompaña a cada ordenador 
Habitúa J mente, se utiliza una escala 
musical en la que cada nota recibe ur 
nombre: DO, RE, MI, FA, SOL, LA y Si 
No obstante, la notación que suele en- 
contrarse en los manuales (normalmen- 
te en inglés) no es ésta Se trata de la 
misma escala, pero con la diferencia de 
que los nombres de las notas aparecen 
como: C, D, E, F, G, A y B. Esta es la no- 
tación habitual anglosajona. 

Esbozando sonidos 

Las instrucciones para el manejo de 
sonido, al igual que ocurre con las des- 
tinadas al tratamiento de gráficos, no 
están en absoluto estandarizadas. Este 
hecho hace que los diferentes ordena- 
dores presenten instrucciones muy di- 
versas para el manejo del sonido. Inclu- 
so ciertos ordenadores carecen de ins- 
trucciones BASIC de esta categoría, lo 
que obliga a recurrir al acceso directo o 
memoria. 

Dentro del microordenador, suele 
existir algún circuito integrado al que se 
le encomienda la misión de apoyar las 
tareas de generación sonora. A este 
«chip» tan sólo hay que completarlo cor 
algún dispositivo que amplifique la pe- 
queña señal que proporciona, antes de 
mandar la señal resultante al altavoz. 

Antes se indicó que tal amplificación 
no suele realizarse en el propio ordena- 
dor, sino que la señal se envía al tele- 
visor para que éste se encargue de am- 
plificarla. 

Para comunicar al circuito integrado 
«experto en sonido» la información que 
éste precisa para realizar su tarea, se 
utilizan unas determinadas posiciones 
de memoria. Posiciones a las que tiene 
acceso el generador de sonido y de don- 
de toma los datos que debe depositar en 
sus registros. 

Empezaremos hablando del caso en e. 
que es necesario acceder directamente 
a la memoria principal del ordenador 
para programar ios circuitos qUe éste 
posee para producir sonidos. Tal opera- 
ción es realizable en cualquier aparato 



Genera un sonido con una duración y una frecuencia indicadas en su argumento. 

Formato: BEEP <durac ión>,<f rec u enci a> 

Ejemplos; 10 BEEP 0*5,7 
50 BEEP 1,5 
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cierto intervalo de tiempo. También 
existen otras palabras como ZAP, EX- 
PLGDE, etc. Dentro de esta misma cate- 
goría de herramientas para generar so- 
nidos elementales cabe considerar el 
carácter ASCII 7; un carácter de control 
que produce un pitido audible al intro- 
ducirlo en el ordenador a través de una 
instrucción PRINT; 

PRINT CHRK7) 

Avanzando en el sonido 

El lenguaje BASIC da entrada a otro 
tipo de intrucciones más elementales 
para la programación de sonidos. Como 
ya suele ser habitual —aunque lamen- 
tablemente—, las coincidencias en el 
repertorio de los distintos intérpretes 
BASIC en este punto son casi inexisten- 
tes. 

Vamos a empezar hablando de la ins- 
trucción BEEP, pero esta vez acompaña- 



da por dos parámetros. Uno de ellos ser- 
virá para indicar la frecuencia de la nota 
deseada y el otro señalará la duración 
que se desea que tenga el sonido. En 
este caso no será necesario seleccionar 
la octava deseada, sino que bastará con 
dar números cada vez mayores con lo 
que se irá pasando de una octava a la si- 
guiente. 

Uno de los problemas inherentes a 
este tipo de instrucciones es que al em- 
plear números se pierde de vista la nota 
y octava con la que se está trabajando. 
No obstante, el principal problema resi- 
de en que cuando se ejecuta esta ins- 
trucción el programa se detiene hasta 
que se concluye su tratamiento. Así, 
pues, el sonido no es independiente del 
proceso. 

Este sistema es el que utiliza un or- 
denador tan popular como el ZX-Spec- 
trum. A continuación se incluyen, a tí- 
tulo de ejemplo, algunos programas 
destinados á este ordenador. 




j En ciertos microordenadores , la 
I impresión dei carácter ASCII 7 no 
produce alteración alguna en la 
pantalla , sino tan sólo la emisión de 
un pitido. 

No obstante, siempre que sea posible se 
huirá de ello; por la sencilla razón de 
que el procedimiento resulta un tanto 
complicado. En principio, suele ser ne- 
cesario acceder a una posición de me- 
moria para fijar el nivel de volumen de- 
seado. Acto seguido, es preciso acceder 
a otras posiciones para fijar la nota, la 
duración, la envolvente, etc. El proble- 
ma reside en que para ello es necesario 
recordar las posiciones de memoria aso- 
riadas a cada uno de estos registros, y 
los valores adecuados que han de intro- 
ducirse en los mismos. Además, en mu- 
chos casos estos valores están relacio- 
nados con la frecuencia de emisión por 
medio de ecuaciones matemáticas más 
o menos complicadas. 

Una alternativa sencilla para obtener 
sonidos consiste en acudir a una serie 
de palabras BASIC, que al ser interpre- 
ndas por el ordenador dan lugar a un 
sonido determinado y fijo, no admitien- 
do por lo tanto ningún parámetro. Tal es 
el caso, por ejemplo, de la palabra 
BEEP. Esta da nombre a un comando 
cuya ejecución hará que el altavoz emi- 
ta un determinado sonido durante un 




Dentro de la compleja interioridad del ordenador también caben circuitos 
especializados en la generación de sonidos. 




Permite acceder a los registros de sonido para su programación. 

Formato: SOUND <registro>,<co nten i do> 

Ejemplos: 20 SOUND 5,3 

70 SOUND 11,128 
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Hoy en día , la 
tecnología 
permite que 
un simple chip 
realice todas 
las funciones 
necesarias 
para la 

generación de 
sonidos. Tales 
el caso r por 
ejemplo, del 
circuito 
integrado 
AY-3-89 1 0. 



El primero de ellos permite recorrer 
una octava completa: 



10 FOR l-OTO 11 
20 BEEP 0.5,1+12 
30 NEXT I 



10 FOR l=0TO 1 1 
20 BEEP 0.5,1 
30 NEXT I 



Análogamente, la octava selecciona- 
da puede ser una inferior: 

10 FOR 1=0 TO 11 
20 BEEP 0.SJ-12 
30 NEXT I 



El mismo programa puede ejecutarse 
para una octava más alta H lo que permi- 
tirá observar la diferencia entre las no- 
tas reproducidas en una u otra octava: 



Cuando se trata de definir una com- 
posición relativamente larga, es conve- 
niente, en lugar de escribir tantas ins- 
trucciones BEEP como notas se deseen 
interpretar, encerrar esta instrucción 
dentro de un bucle. La lectura de Jos da- 
tos se realizará mediante instrucciones 
READ/DATA; en esta últimas estarán 
escritos los valores que conducirán al 







1 J 






1 / 






rp 


\ . • 0 




LVé 


1 . • * 




i 

I Escala mustc 
entre la nota 


DO RE M! SOL LA S! 

ni ni ni mi ni ni 

E F A B C D 

•al en ia que $e refleja la correspondencia 
ción habitual y la anglosajona. 



resultado apetecido. Veamos un ejem- 
plo: 

100 FOR 1=1 T0 100 
110 READ A,C 
120 BEEP A/2.5G,C 
130 NEXT I 

1 40 DATA Ü.25,7,0. 25,9,0.5,1 1 ,0.5,1 4,0.75, 1 4,0.25, 
16,0.5,14,0.5,11,0.75,7 

Al terminar de leer este bloque de ins- 
trucciones el ordenador se detendrá 
presentando un mensaje de error, debi- 
do a que no hay suficientes datos para 
solventar todas las pasadas que hay que 
dar al bucle. Esta breve rutina se ha 
confeccionado de forma que sea utiliza- 
ble para reproducir composiciones de 
cualquier longitud, sin más que añadir 
sucesivas líneas DATA con los datos 
oportunos. Cuando la composición esté 
terminada, será suficiente con contar 
los datos que la integren y ajustar el va- 
lor final del bucle en función de dicho 
número. 



Acceso a los registros de sonido 

Al principio del capítulo se mencionó 
que ciertos ordenadores exigían el ac- 
ceso directo a ios registros de sonido 
para programar la producción del mis- 
mo, Por otra parte, también existen or- 
denadores con instrucciones BASIC que 
facilitan el trabajo directo con los regis- 
tros de sonido, sin necesidad de recurrir 
a los laboriosos POKES, Veamos un 
ejemplo práctico, utilizando el chip de 
sonido AY-3-8910; uno de los más em- 
pleados en ios modernos ordenadores. 

Sí el ordenador posee más de un ca- 
nal de sonido, las opciones se multipíi- 
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TABU DE CONVERSION 


Ordenador 


Sonidos fijos 


Sonidos 

variables 


Acceso a los 
registros 


Comandos directos 


CHRS{7) 


BEEP ni, n2 


SOUND <r>, <c> 


AMSTRAD 


— 


CHR$(7) 


SOUND ni, n2. n3, n4.n5, 
n6, n7(4) 


— 


APPLE II 
(APPLESOFT) 


- 


CHR$(7)o CTRL+G 


- 


- 


APRICOT 

(M-BASIC) 




- 




- 


ATAR! 


- 


- 


SOUND ni, n2, n3, n4 (1) 


- 


CBM 64 


- 


- 


- 


- 


DRAGON 


- 




SOUND n2, ni 


— 


EQUIPOS MSX 


BEEP 


CHR$(7) 




SOUND <r>,<c> 


HP-150 


- 


CHR$(7) 


- 


- 


IBM PC 


- 


CHR$(7) 


SOUND n2, ni 


- 


MPF 


- 


- 


- 


- 


NCR DM-V 
(MS-BASIC) 


- 


CHR$(7) 


- 


- 


NEW BRAIN 


- 


- 


— 


- 


ORIC 


SHOOT, ZAP, PING, 
EXPLODE 


CHR$(7) o CTRL+G 


MUSIC ni, ni. n3 (2) 




SHARP MZ-700 
(MZ-BASIC) 


- 


- 


- 


- 


SINCLAIR QL 


- 


— 


BEEP (3) 


- 


SPECTRAVIDEO 


BEEP 


CHR$ (7) 


- 


SOUND <r>, <c> 


ZX-SPECTRUM 


- 


— 


BEEP ni, n2 


— 



ni: duración. n2: nota, <r>: registro. <c>; contenido 

(1) SOUND ni, n2, n3, n4, ni: canal. n2: nota. n3: distorsión n4: volumen. 

(2) MUSIC ni, n2, n3, n4. ni: canal. n2: octava. n3: nota. n4: volumen. 

(3) BEEP[n1 r n2[ r n3, n4, n5[, n6[ ( n7[, n8]]]]]. ni: duración. n2: nota. n3: nota secundaria: entre ella y n2 oscilara el sonido, n4; intervalo entre oscila- 
dores de notas. n5: define el tamaño de cada oscilación. n6: repetición. n7: rizado. nB: aleatorio. 

(4) SOUND ni, n2, n3, n4, n5 r n6 r n7: ni : canal. n2: período n3: duración. n4: volumen. n5: envolvente de volumen. n6: envolvente de tono. n7: período 
de ruido. 



can. Existen instrucciones previas que 
seleccionan uno y otro canal; e incluso 
instrucciones que admiten más paráme- 
tros, uno para cada canal. Veamos un 
ejemplo de esto último: 

BEEP (2,4), (3,1], (2,4] 



en donde cada uno de los paréntesis se 
refiere a un canal. 

El referido chip dispone de 14 regis- 
tros accesibles por el programador. 
Cada uno de estos registros contiene in- 
formación específica que es utilizada 
por el circuito integrado para saber el 



sonido que ha de generar. La tabla ad- 
junta incluye una lista de los referidos 
registros, señalando las funciones aso- 
ciadas a cada uno de ellos. 

Frecuencia 

Los registros del O al 5 se utilizan por 
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4 



Afgunos equipos 
ofrecen al usuario 
ta posibilidad de 
ejecutar comandos 
BASIC que 
proporcionan 
sonidos fijos. 



SOUND 0,32 




CHIP de SONIDO 



pares para determinar ía frecuencia del 
sonido a emitir. Se rigen por la siguien- 
te fórmula: 

X=(1. 78977*10 EXP 6]/16*F 
RB=INT (X/256] 

RA=X— RB*256 

en donde RA puede coincidir con uno de 
los registros 0 H 2 ó 4, y RB con los re- 
gistros 1,3 ó 5. 

Ruido 

El registro seis selecciona la frecuen- 
cia central del ruido, por medio de un 
valor que ha de ser buscado en la co- 
rrespondiente tabla; en ella, cada fre- 
cuencia tiene asignado un valor especí- 
fico. 

Selección del tipo de canal 

El registro al efecto se emplea para 
indicar al generador el uso que se va a 
dar a cada uno de los canales. Cada ca- 
nal puede ser utilizado para emitir soni- 
do o bien ruido. Para efectuar esta se- 
lección se utilizan los seis bits menos 
significativos del registro. Según esté a 
uno o a cero cada uno de estos bits, in- 
dicará si el canal correpondiente está 
seleccionado o no. La siguiente tabla re- 
vela la utilidad de los seis bits del re- 
gistro. La tabla comienza por el bit me- 
nos significativo y termina con el sexto 
bit (el último que se utiliza). 

0 Canal A de sonido 

1 Canal B de sonido 

2 Canal C de sonido 

3 Canal A de ruido 

4 Canal B de ruido 

5 Canal C de ruido 




/Mm 

El empleo del comando BEEP con 
parámetros permite conseguir muy 
diversos tipos de sonidos. 



Evidentemente, el siguiente paso con- 
siste en transformar la palabra binaria 
obtenida a notación decimal, e incluirla 
en la instrucción oportuna. 

Volumen 

Los registros del 8 al 10 preseleccio- 
nan ei volumen con e! que ha de emitir 
cada uno de los canales de sonido. Sus 
valores van del 0 al 15. Cuando su va- 
lor es 16 r el control pasa al generador 
de envolventes. 



Envolvente 

La envolvente define la forma en la 
que cambia el nivel de volumen del so- 
nido producido. El chip que nos ocupa 
tiene ocho patrones diferentes, cuyo as- 
pecto puede observarse en la figura que 
acompaña al texto. 

Los registros 1 y 1 2 fijan el período de 
la envolvente, mientras que el registro 
3 sirve para seleccionar el patrón de la 
misma. 



REGISTROS DEL CHIP 0É SONIDO AY-3-8910 


Registro 


Función 


0 


Frecuencia canal A 


Control preciso 


0-255 


1 


Frecuencia canal A 


Control de escala 


0-18 


2 


Frecuencia canal B 


Control preciso 


0-255 


3 


Frecuencia canal B 


Control de escala 


0-18 


4 


Frecuencia canal C 


Control preciso 


0-255 


5 


Frecuencia canal C 


Control de escala 


0-18 


6 


Frecuencia de ruido 




0-31 


7 


Programación de tono de ruido para cada canal 


0-63 


8 


Volumen del canal A 




0-16 


9 


Volumen del canal B 




0-16 


10 


Volumen del canal C 




0-16 


11 


Frecuencia de la envolvente 


Control preciso 


0-255 


12 


Frecuencia de la envolvente 


Control de escala 


0-255 


13 


Envolvente de ataque 




0-255 
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Los sonidos del 

BASIC 



El macrolenguaje 
musical 




El manejo de! sonido en el ordenador depende en gran medida 
de! circuito especializado que incluya el equipo. 



I control del soni- 
do, al igual que el 
de los gráficos, no 
posee un trata- 
miento estandari- 
zado en todos los dialectos del BASIC. 
La razón hay que achacarla a los distin- 
tos criterios que adoptan los fabricantes 
a la hora de elegir el circuito generador 
de sonido. Dicho circuito suele admitir 
un número limitado de órdenes elemen- 
tales que son, precisamente, las indica- 
das en el primer capítulo dedicado al so- 
nido. 

El circuito sonoro del ordenador pue- 
de ser programado para producir una 
gran variedad de tonos y melodías. Al- 
gunos aparatos incorporan un pequeño 
repertorio de sonidos preprogramados. 
Estos sonidos son accesibles mediante 
sencillos comandos BASIC, con lo que 
el empleo de la «voz del ordenador» se 
simplifica en gran medida 

El presente capítulo está dedicado a 
una peculiar forma de utilizar sonidos 
preprogramados. Se trata del denomina- 
do «macrolenguaje musical», presente 
en la mayor parte de los ordenadores 
que emplean el BASIC de Microsoft. El 
macrolenguaje musical es una potente 
Herramienta para la creación de las más 
. arladas melodías. 

Su estructura y forma de uso es simi- 
lar a la del comentado macrolenguaje 
gráfico. 



Macrolenguaje musical y 
comando play 

El macrolenguaje musical va asocia- 
do al comando PLAY, el cual permite el 
acceso a dicho macrolenguaje. El co- 
mando PLAY es ei encargado de hacer 
que se ejecuten las órdenes del macro- 
¿enguaje incluidas en su argumento; ór- 
denes que se expresan dentro de una 
cadena de caracteres. 

La ejecución de una instrucción PLAY 
nace que se envíen las órdenes perti- 
nentes al circuito de sonido del ordena- 
dor. 

Una vez recibidas, el generador de so- 
nido se pone a trabajar independiente- 
mente del resto del ordenador. Esto sig- 



nifica que mientras se genera el sonido 
se puede seguir ejecutando el programa 
principal. Con ello se evita que la eje- 
cución del programa se vea retardada 
por efecto de la emisión de sonido. 

Como ya se ha comentado, el coman- 
do PLAY admite una cadena de caracte- 
res en su argumento. Dicha cadena 
debe ajustarse a las normas impuestas 



por el macrolenguaje. En definitiva, el 
formato que ha de mostrar el comando 
PLAY es el siguiente: 

(Número de línea) PLAY <cadena1> 

[, <cadena2>...] 

En el formato general' de PLAY se 
aprecia la posibilidad de añadir más de 




MODERATO 




El macrolenguaje musical adopta una 
nomenclatura muy cercana al cifrado 
clásico de la música. 
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una cadena. Ello es posible cuando el 
aparato con el que se está trabajando 
dispone de más de un canal de sonido; 
esto es, permite emitir más de una voz 
al tiempo. En algunos ordenadores es 
corriente el empleo de hasta tres cana- 
les de voz, lo que hará posible la crea- 
ción de una melodía con hasta dos 
acompañamientos. 



Primeros pasos: las notas 

El macrolenguaje musical de Micro- 
soft adopta una filosofía que será det 
agrado de aquellos que posean algunos 
conocimientos de solfeo. En primer lu- 
gar, los sonidos se indican por sus co- 
rrespondientes notas. De todos son co- 
nocidas las siete notas de la escala mu- 
sical: DO, RE, Ml r FA, SOL, LA y SI. Sin 
embargo, esa no es la nomenclatura uti- 
lizada aquí. El macrolenguaje musical 
emplea la signatura anglosajona, que 
tiene una correspondencia biunívoca 
con la anterior. Esta nomenclatura hace 
uso de las siete primeras letras del abe- 
cedario inglés (Jas mismas del castella- 
no sin la «ch»). La relación entre ambas 
formulaciones se muestra en la corres- 
pondiente tabla. 

Como se puede observar en la tabla 
adjunta, la nueva nomenclatura co- 
mienza en la nota LA, siguiendo luego 



en el orden habitual. Así pues, para la 
interpretación de una escala de DO a SI 
basta con ejecutar la línea que se indi- 
ca a continuación. 

10 PLAY TDEFGA8" 

En el caso de disponer de varios ca- 
nales, cada uno de ellos admitirá una 



cadena diferente. En ese supuesto, las 
distintas cadenas irán separadas por co- 
mas. La misma escala entonada a tres 
voces se formularía como sigue; 

10 PLAY "CPEFGAB", TPEFGAT, ' CDEFGAB" 

Al interpretar las tres voces la misma 
melodía, ésta se oirá como si se tratara 




PLAY "ABC'YAB'V’A" 



I Algunos aparatos permiten el uso 
simultáneo de tres voces o canales * 
Ello se consigue añadiendo 3 
cadenas en el argumento de PLAY 
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La notación 
empleada para 
identificar las 
notas es la 
denominada 
«anglosajona». 



de una sola voz. Para apreciar con ma- 
yor claridad cada una de las voces o ca- 
nales conviene indicar distintas melo- 
días para cada una. Ejecutando el si- 
guiente ejemplo se emitirán notas dife- 
rentes por cada canal: 



liza el término «bemol». De esta forma, 
el primer guión se puede denominar DO 
sostenido o RE bemol, mientras que el 
segundo corresponde tanto al RE soste- 
nido como al MI bemol. Las referidas 
notas intermedias también pueden ser 



interpretadas mediante el macrolengua- 
je musical. Para ello se emplean los sig- 
nos + y - detrás de la nota en cuestión. 
Por ejemplo, el mencionado primer 
guión se formularía como C+ {DO soste- 
nido) o D- (RE bemol). Por supuesto. 



10 PLAY 'CDEFGAfT, "DEFGABC” "EFGABCD" 



Sostenidos y bemoles 

Las siete notas de la escala cromáti- 
ca no son las únicas existentes. En rea- 
lidad, ia separación entre las sucesivas 
notas sigue una regla un tanto extraña. 
La diferencia entre dos notas recibe el 
nombre de tono o semitono dependien- 
do de las notas que sean. Un tono índi- 
ca una separación en frecuencia fija, de 
la cual el semitono es justamente la mi- 
tad, Para aclarar conceptos será nece- 
sario consultar ía tabla de separación 
entre notas. 

Dicho de otra forma, si se separan las 
notas tomando como unidad el semito- 
no, quedarán huecos libres. Téngase en 
cuenta que un tono equivale a dos se- 
mitonos. La tabla adjunta muestra la es- 
cala de semitonos completa. 

En ella se observa que quedan posi- 
ciones sin ocupar después de cada nota, 
excepto entre MI/FA y SÍ/DO. Estos 
puntos, marcados en la tabla con guio- 
nes, corresponden a notas intermedias. 
Dichas notas se nombran en relación a 
la nota anterior o posterior. Así, el pri- 
mer guión de la tabla corresponde al DO 
sostenido, el segundo al RE sostenido, 
etc. Esta nomenclatura hace referencia 
a la nota inmediatamente anterior. Si se 
desea referenciar las notas intermedias 
en relación a las que la siguen, se utí- 



REDONDA 




L1 



BLANCA 




L2 



CORCHEA 




SEMICORCHEA 










4 




L8 




L16 














FUSA 




SEMIFUSA 
















L32 






L64 





Repertorio de duraciones 
estándar de las notas. 



NEGRA 

,L4 
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0 — K+) 




El macrolenguaje musical permite 
el empleo de las notas intermedias, 
añadiendo «+» si es sostenido 
y si es bemol. 



existen dos notas que no admiten sos- 
tenido: MI y $1, ya que sus sostenidos 
corresponden a FAy DO respectivamen- 
te. De la misma forma, ni FA ni DO ad- 
miten la correspondiente bemol. 

Empleando estas notas intermedias 
se puede recorrer la escala completa 
por medio de la siguiente instrucción: 

10 PLAY "CODMFF+GG^AA+B" 

Más escalas: las octavas 



Los modernos ordenadores incluyen 
circuitos integrados generadores de so- 
nido capaces de abarcar ocho o más oc- 
tavas. El macrofenguaje musical con- 
templa esta posibilidad, permitiendo 
elegir la octava. Rara ello se emplea el 
comando-letra O seguido del número 
identificativo de la octava deseada. 
Cuando no se indica la octava {como en 
los ejemplos anteriores) se utiliza la oc- 
tava central del espectro. Como ejemplo 
se muestra el efecto asociado al uso de 
diferentes octavas para cada canal: 



10 PLAY "OICDEFGAB" "QACDEFGAB" rH 07CDEFGAB" 

Esta sencilla línea hará que suene ía 
misma melodía en tres octavas distin- 
tas. Cada canal emplea una octava dife- 
rente, sonando las tres ai tiempo. Con 
ello se aprecia tanto la diferencia de oc- 
tava, como Ja diferencia de canal. Bi se 
desea que suene cada octava separada 
(empleando una sola voz) se ha de in- 
troducir y ejecutar la siguiente línea: 

10 PLAY "01 CDEFGA BG4CDE FG AB07CDE FG AB” 



Hasta ahora se ha visto la forma de 
utilizar las notas de una escala. Se sabe 
que, tras la última nota de una escala, 
SI, viene ei DO de la escala siguiente. 
En realidad, la secuencia de notas se 
puede repetir infinitamente, tanto hacia 
arriba (sonidos agudos) como hacia aba- 
jo (sonidos graves). El único límite lo im- 
pone la capacidad auditiva del oído hu- 
mano. 

El oído medio es capaz de percibir una 
gama de frecuencias que supera con 
creces la extensión de la escala básica. 
Por ello se añaden más escalas, identi- 
ficándose cada una por la posición en Ja 
que se encuentra. Cada escala indivi- 
dual se denomina «octava». Con esto, un 
sonido determinado se reconoce por la 
octava en la que se encuentra, y dentro 
de Ja octava, por la nota a la que corres- 
ponde. 




Los silencios son también 
importantes. El subcomando R es el ' 
encargado de proporcionar los 
silencios. 
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Tras la ejecución de un comando O r 
la octava queda fijada hasta que se vuel- 
va a variar por medio de otro comando 
O, Esto quiere decir que si se ejecuta 
otro comando PLAY a continuación del 
incluido como último ejemplo, se co- 
menzará en la séptima octava (07). 

Existe otra forma de acceder a las di- 
ferentes notas. Este nuevo método no 
utiliza las escalas habituales, sino que 
numera las notas consecutivamente. 
Contando las notas naturales y las in- 
termedias, cada octava tiene doce notas. 
Si se dispone de un total de ocho octa- 
vas, el número de notas permitidas es 
de 12x8=96. 

Las 96 notas pueden identificarse me- 
diante su número de orden. Ese es pre- 



cisamente el otro modo de acceder a 
cada nota. Para el empleo de esta nota- 
ción se hace imprescindible un nuevo 
comando-letra. Se trata en este caso de 
la letra N, que seguida por un número 
del O al 95 permite la emisión de la nota 
correspondiente. En esta notación, NO 
corresponde al DO de la primera octa- 
va, y N95 al SI de la octava número 
ocho. 

Las dos instrucciones siguientes pro- 
porcionan el mismo resultado. La prime- 
ra emplea la notación habitual, mien- 
tras que la segunda hace uso de la no- 
tación absoluta: 

10 PLAY ' r G1 CC+DD+EFF+GG+AA+B ,r 

10 PLAY ' r N0Nl M2N3M4N5N6N7N8M9N1 ON UNI T 



Siguiendo la notación absoluta, el DO 
de la octava inicial (cuarta octava: 04) 
se formula como N36 



Duración de tas notas 

En la interpretación de una melodía 
la duración de todas las notas no es la 
misma. Una nota puede mantenerse so- 
nando más o menos tiempo que las de- 
más. Por regla general, a cada nota de 
una melodía le corresponderá una du- 
ración propia. En terminología musical, 
las duraciones se especifican como sub- 
múltiplos de la duración máxima. Cada 
duración inferior es exactamente la mi- 




ta repetición cíclica de las escalas obliga a identificar 
la octava a la que corresponde una determinada nota 




El subcomando T permite vanar ia velocidad de ejecución 
de la pieza , prefijando el número de notas negras por 
minuto que hay que ejecutar. 



El volumen del sonido emitido 
se controla por medio 
del subcomando V. 



75 







tad de fa anterior. La nomenclatura em- 
pleada para las duraciones de las notas 
es la que se muestra en Ja tabfa adjunta. 

La duración empleada hasta ahora es 
la de "negra"'. Esta es la duración que 
el ordenador toma incialmente. Para ha- 
cer que la duración de una determinada 
nota aumente puede recurrirse a la re- 
petición de la misma. Por ejemplo, fa si- 
guiente línea interpreta DO en negra, 
RE en blanca y MI en redonda. 

30 PLAY J 'CDDEEEE Jr 

Sin embargo, este método no permite 
duraciones más cortas. Además, la re- 
petición de una nota no proporciona el 
efecto exacto: se percibe la separación 
entre cada dos notas. 

En el macrolenguaje musical está 
prevísa la variación de la duración de las 
notas. Para ello se emplea la letra- 
comando L. 

A continuación de la misma se añade 
un número que puede variar de 1 a 32. 
Dicho número indica la fracción de «re- 
donda^ que ha de emplearse. La corres- 
pondiente tabla relaciona las figuras 
clasicas con la notación de! macrolen- 
guaje. 

El comando L permite también espe- 
cificar duraciones no estándar, como por 



Correspondencia entre las nomenclaturas de Fa 
escala cromática 


DO 


C 


RE 


D 


Mi 


E 


FA 


F 


SOL 


G 


LA 


A 


SI 


B 


DO 


....... C 


RE 


D 


MI 


E 


FA 


„ F 


SOL 


G 



ejemplo L5 ó L6. A continuación, se 
muestra un ejemplo en el que la escala 
se interpreta en corcheas: 

20 PLAY "L8CDEFGAB" 

En el ejemplo se ve que la acción del 
comando L queda fijada. Al igual que el 
comando que especifica la octava (0) su 
efecto se extiende hasta el punto en el 
que se ejecuta otro comando análogo. 
Así, la línea siguiente: 

30 PUY TDEFGAfT 



tendrá una duración distinta dependien- 
do de la instrucción, de entre ías si- 
guientes, que la preceda: 

20 PLAY '11" 

20 PUY "L4" 

20 PUY 116” 

Para hacer que cada nota tenga su 
propia duración puede optarse por pre- 
ceder cada una de ellas con el corres- 
pondiente comando L. En el siguiente 
ejemplo se interpreta la escaía en cor- 
cheas, salvo el FA, que tiene duración 
de semicorchea: 

20 PUY rJ L8CDEL16FL8GAB' J 

Las tres primeras notas están efecta- 
das por el primer comando L3, siendo 
por lo tanto corcheas. La nota FA se 
hace semicorchea por medio de L16. 
Para que el resto de notas siga con la 
duración inicial, es preciso restaurar 
ésta con un nuevo L8. En este caso, el 
proceso es demasiado engorroso para 
variar Ja duración de una sola nota. 
Afortunadamente, el macrolenguaje 
permite realizar esto mismo de una for- 
ma más sencilla. 

Si lo que se pretende es alterar la du- 
ración de una sola nota, no es preciso 
el uso del comando L, Como se ha vis- 
to, el comando L fija fa duración de to- 
das tas notas que le siguen. Para espe- 
cificar la duración de una sola nota bas- 
ta con indicar esa duración a continua- 
ción de Ja propia nota (se emplea al 
efecto el número que se utilizaría con el 
comando L). Haciendo uso de esta nue- 
va facilidad, el anterior ejemplo se re- 
duciría a los siguiente: 

20 PLAY T8CDEF16GAB" 

Se observa en el ejemplo que la va- 
riación en la duración sólo afecta a FA. 
Las restantes notas seguirán con la du- 
ración marcada por el último comando 

L. 

La duración de una nota puede ser va- 
riada de una tercera forma. En música 
se emplean puntos para alargar la du- 
ración de una nota. Un punto situado in- 
mediatamente después de la nota, alar- 
ga ésta en fa mitad de su duración*. Un 
segundo punto la alargará en !a mitad 
de fa mitad, etc. Esto mismo puede rea- 
lizarse en el ordenador. El método es 
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TABLA DE CONVERSION 



Ordenador 


PLAY 


Subcomandos 


PLAY 


A, B, C. D, E, F, G 


0 


L 


R 


N 


V 


T 


X <var>; 


<com>=<var>í 


AMSTRAD 


- 


- 




- 


- 


- 


- 


- 




- 


APPLE II 
(APPLESOFT) 


- 


“ 


- 


- 


- 


- 


- 


- 


— 


- 


APRICOT 
(M BASIC) 


- 


- 


— 


- 


- 


- 


- 


— 




- 


ATARI 


- 


- 


- 


- 


- 


- 




- 


— 


- 


cm 64 


- 


- 


- 


- 


- 


- 


- , 


— 


- 


- 


DRAGON 


PLAY 


A, B, C, D, E. F, G 


0 


L 


P 




V 


T 


X<var>; 


- 


EQUIPOS MSX 


PLAY 


A, B, C, 0, E, F, G 


0 


L 


R 


N 


V 


T 


X <var>; 


<com>=<var>; 


HP-150 


- 


- 


- 


- 


- 




- 


- 


- 


- 


IBM PC 


PLAY 


A, B, C. D, E, F, G 


0 


L 


P 


N 


V 


T 


X <var>; 


<com>=<var>; 


MPF 


- 


— 


- 




- 


- 


- 


- 


- 


- 


NCR DM-V 
(MS-BASIC) 


- 


- 


- 


— 


- 


- 


- 


- 


- 


- 


NEW BRAIN 


- 


- 


- 


- 


- 




- 


- 




- 


ORIC 


- 


- 


- 


- 


- 


- 


- 


- 


- 


- 


SHARP MZ-700 
(MZ-BASÍC) 


- 


— 


- 


- 


- 


- 


- 


- 




— 


SINCLAIR QL 


- 




- 


- 


- 


- 


- 


- 


- 


- 


SPECTRAVIDEO 


PLAY 


A, B, C, D, E, F, G 


0 


L 


R 


- 


V 


T 


X <var>; 


<com>=<var>; 


ZX-SPECTRUM 


- 


- 


- 


- 




— 


- 


- 


- 


- 



déntico al mencionado: basta con aña- 
dir uno o dos puntos tras la nota a alar- 
gar El siguiente es un ejemplo válido 
del empleo de los puntos: 

JO PLAY "CAC AO A" 



Silencios 

En la interpretación de una melodía 
son tan importantes los sonidos como 
ios silencios. Un silencio, como su pro- 
3 Ío nombre indica, ¡ntroduce.una pausa 
en la que no se emite ningún sonido. 
los silencios se emplean para separar 



notas, dando, además, el ritmo adecua- 
do a la interpretación. 

Los silencios pueden tener diferentes 
duraciones. La nomenclatura empleada 
en las duraciones de un silencio es la 
misma que la indicada para las notas. 
Así, un silencio puede durar una cor- 



Separación entre notas 


DO-RE 


un tono 


RE-MI 


un tono 


MI-FA 


un semitono 


FASOL 


un tono 


SOL-LA 


un tono 


LA-SI 


un tono 


SI-DO 


un semitono 



chea, una negra, etc. En el macrolen- 
guaje musical, el silencio se indica con 
la letra H seguido por un número. El nú- 
mero que acompaña a este comando 
adopta las mismas reglas que el pará- 
metro asociado al comando L. A conti- 
nuación, se muestra un ejemplo del uso 
de silencios: 

10 PLAY "OPEE" 

20 PLAY TR64DR64ER64E Hr 

Las dos melodías poseen las mismas 
notas con idénticas duraciones. Sin em- 
bargo, el empleo de silencios en la se- 
gunda hace que las notas se interpreten 
ligeramente separadas. Concretamente, 
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las dos últimas notas parecen una sola 
en la primera ejecución. 



Volumen y movimiento 

Existen dos características que reper- 
cuten en la totalidad de la melodía a in- 
terpretar, Estas son el volumen y el mo- 
vimiento, El volumen se refiere a la in- 
tensidad del sonido. Por regla general, 
ei volumen se mantendrá fijo durante 
toda la emisión sonora. Esto significa 
que bastará con definirlo al principio. 

Por otra parte, el movimiento indica la 
velocidad a la que se toca la melodía. 
Dicha velocidad marca la duración real 
de las notas. El movimiento viene a es- 
pecificar el número de redondas por mi- 
nuto. 

El comando que selecciona el volu- 
men en el macrolenguaje que se está 
analizando es V. Este comando irá se- 
guido por un número que indica la mag- 
nitud de dicho volumen. La citada can- 
tidad varía desde cero (pianissimo) has- 
ta 15 (fortissimo). En el siguiente ejem- 
pío se hace sonar una nota en todos los 
volúmenes posibles: 

10 PLAY "VOCVI CV2CV3CV4CV5CV6CV7C'' 

20 PLAY "VSCVSCVI 0CV1 1 CV1 2CV1 3CV1 4CV1 5G ' 

Por su parte, el movimiento se indica 
por medio del comando T. El número 
que acompaña a esta letra indicará la 
cantidad de negras por minuto que han 
de sonar. La variación que admite este 
comando cubre desde 32 (32 negras por 
minuto) hasta 255 (255 negras por mi- 
nuto). De esta forma se calibra la velo- 
cidad de ejecución de la obra, desde 
«lento» hasta «vivace», pasando por 
«adagio», «andante» y «allegro». 



El empleo de variables 

En algunas ocasiones se emplea una 
misma serie de notas en distintos pun- 
tos de una melodía. En estos casos re- 
sulta tedioso repetir las mismas notas 
una y otra vez, Ei macrolenguaje musi- 
cal permite almacenar esas listas de no- 
tas de forma muy flexible. Como se ha 
visto, los conjuntos de órdenes del ma- 
crolenguaje se manipulan en forma de 
cadenas de caracteres. Pues bien, tam- 
bién se puede hacer uso de variables de 
ese mismo tipo. Un posible ejemplo es 
el que se muestra a continuación: 



100 LET A$= M CDECDFCDG" 
110 PLAYA* 



Esta facilidad permite interpretar va- 
rias veces una misma melodía sin tener 
que teclear de nuevo toda su formula- 
ción. Pero no es ésta la única posibili- 
dad del empleo de variables. Se pueden 
insertar variables en el interior de una 
cadena ejecutable, conteniendo éstas 
fragmentos de la melodía completa. 
Para ello se utiliza el comando X, segui- 
do del nombre de variable de cadena y 
de un punto y coma. Siguiendo con el 
ejemplo anterior, ésta es una amplia- 
ción del mismo: 



Duraciones de las notas 


Símbolo 


Duración 


Selección con el comando 

L 


redonda 

blanca 

negra 

corchea 

semicorchea 

fusa 

semisufsa 


duración unidad 
media redonda 
media blanca (1/4 redonda) 
media negra (1/8 redonda) 
media corchea (1/16 redonda) 
media semicorchea (1/32 redonda) 
media fusa (1/64 redonda) 


L1 (duración unidad) 
L2 (1/2 redonda) 

L4 (1/4 redonda) 

L8 (1/8 redonda) 
L16 [1/16 redonda) 
L32 (1/32 redonda) 
L64 (1/64 redonda) 




120 PLAY "03XA$06XA$" 

En esta última línea se ha repetido 
dos veces el anterior fragmento. En cada 
una de las ejecuciones se ha utilizado 
una octava distinta, para diferenciarlas. 

Las variables de cadena no sólo pue- 
den contener notas, sino también indi- 
caciones de octava, duración, etc. 

Además de las variables de cadena 
(para listas de órdenes) se puede hacer 
uso de variables de tipo numérico. Es- 
tas últimas permiten almacenar los da- 
tos que se adjuntan con los comandos 
O, V, T, etc.: datos numéricos. Las va- 
riables se añaden tras el comando ade- 
cuado, precedidas por un signo «=» y se- 
guidas del preceptivo punto y coma. El 
mismo ejemplo de más arriba se com- 
pleta con la posibilidad de variar el vo- 
lumen: 



10 INPUT "VQLUMEN=";VOL 
100 LET A$-”CDECDFCDG" 
110 PLAY "V=V0L;" 

120 PLAY "O3XA$;06XAV , 



En este caso se recoge el lado de vo- 
lumen en la instrucción INPUT de la lí- 
nea 10, Ese valor se almacena en la va- 
riable VOL, variable empleada en la lí- 
nea 110 para fijar el volumen. 
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Del 

código 



I BASIC es un len- 
guaje de alto ni- 
vel. Ello significa 
que se trata de 
una representa- 
ción no directamente inteligible por el 
ordenador, sino próxima al lenguaje ha- 
blado convencional. En consecuencia, 
el ordenador ha de convertir las expre- 
siones BASIC a otro código que sea ca- 
paz de entender y ejecutar: el código 
máquina. Así pues, ¿por qué no progra- 
mar directamente en código máquina? 

El manejo del código máquina tiene 
sus ventajas, pero también sus inconve- 
nientes, Este es, precisamente, el tema 
en discusión a lo largo del presente ca- 
pítulo. 

Aspecto del código máquina 

El código máquina corresponde a la 
representación de instrucciones más 
cercana al ordenador. Esta representa- 
ción cabe imaginarla como filas de unos 
. ceros. Cada ocho de estas cifras se 
agrupan en un byte, y cada byte o grupo 
de ellos es capaz de dar cuerpo a una 
nstrucción elemental. 

El repertorio de instrucciones depen- 
de de la configuración física (hardware) 
del ordenador, y más concretamente del 
microprocesador que constituye su ce- 
lebro. Distintos microprocesadores uti- 
zan diferentes repertorios de ínstruc- 
:¡ones y, por lo tanto, los programas en 
código máquina no coincidirán. 

Las instrucciones en código máquina 
f an mucho más elementales que las del 
enguaje BASIC. Por ello, una instruc- 
: on BASIC suele descomponerse en va- 
as de código máquina. Así, por ejem- 
:io, la actividad asociada af tratamiento 
ce la sentencia BASIC LET A=B+C ha de 
seguir fos siguientes pasos; 

— Recoger el dato almacenado en la 
zosición de memoria indicada como B. 

— Recoger el dato almacenado en la 
cosición de memoria referenciada como 

— Sumar ambos datos. 

— Almacenar el resultado en la po- 
rción de memoria identificada por A. 

Este método sería válido s¡ se tratara 
es datos de un byte (ocho bits). No obs- 



BASIC al 
máquina 




Las instrucciones del código máquina 
son mucho más elementales que las 
del BASIC. Ello hace que la más 
simple instrucción BASIC se traduzca 
en vanas instrucciones 
de código máquina. 



tante, si Jos datos a sumar fueran nú- 
meros enteros, se utilizarían dos bytes 
para codificar cada uno de ellos, con lo 
cual la cosa se complica. Habría que re- 
coger dos bytes por dato y realizar dos 
sumas, una con cada byte. Más comple- 
ja todavía sería Ja suma de datos de do- 
ble precisión, que utilizan ocho bytes. 

Como se observa, el código máquina 
puede resultar bastante incómodo a la 
hora de programar procesos complica- 
dos. Sin embargo, la ejecución de sub- 
rutínas en código máquina es mucho 
más rápida que en BASIC. Ello se debe 




A pesar de que nos comunicamos 
con el ordenador en BASIC, éste no 
es su lenguaje «natural». La máquina 
se ve obligada a traducir las 
instrucciones BASIC a su propio 
código interno : el código máquina. 



En la recóndita 
intimidad del 
ordenador 

a que el ordenador no tiene que iracu- 
cir las órdenes, puesto que ya esta- 
su lenguaje interno. 



Empleo de código máquina 5- un 
programa BASIC 

Dentro de un programa en EASiC se 
pueden emplear rutinas escritas en re- 
digo máquina. Estas rutinas Duece- 
coexistir perfectamente con e progrs—s 
BASIC, siempre y cuando ¡as ci- 

nes escritas en código máqu 'a se s- 
túen en la zona de memoria aoectcs 

Para escribir una rutina en cóc z: — a- 
quina hay que partir de un buen cono- 
cimiento del repertorio de ínstr^zc --es 
del microprocesador. Una vez :r" ze- 
da la rutina, ésta debe tradu: a zs 

códigos binarios correspondiente a ee 
respectivas instrucciones Los 
calculados se trasladan a ¡a zo^a :e me- 
moria adecuada por medio de 
BASIC POKE. Este tiene cor: — s:~ 

depositar un número en une ceta a- 

da posición de memoria, y para e : - = :e 
uso de dos datos en su argun----.: e 
primero indica la posición de a 

rellenar, mientras que el segure: :: ~- 
cide con el dato a deposita: e~ ¡a ~ s- 
ma. Por lo tanto, su formulac ó¡~ te'r e 
el siguiente aspecto: 

(Número de línea) POKE <tí t:: 
<número> 

A partir del comando POKE es : : z : e 
escribir un programa capaz ce e — : acar 
una rutina en código máquina =- z e : : 
sicíones de memoria que desee e _s _s- 
rio. Su intervención reiterada se :: _ e - 
gue al incluir el comando PC<E :et- : 
de un bucle FOR/NEXT, 

De la misma forma que se c sz : e ze 
un comando para depositar un catz en 
una posición de memoria, :s~ : e- es 
puede hacer uso de una fu re ic~ -e- 

cuperarlo. Esta función se asoc e e e 
palabra clave PEEK. Su for— _ =: 1- ee 
la que sigue: 

(Número de línea) <var.>=?EE< <c- 

reccíón>) 

En este formato se ha situaez 
ción PEEK dentro de una se^tz't z :z 
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MINORIA 

La memoria principal del ordenador 
consta de dos zonas bien 
diferenciadas: la ROM . cuyo 
contenido es fijo e imposible de 
alterar y la RAM. [ en la que es posible 
tanto leer como escribir datos , 



asignación. Sin embargo, al tratarse de 
una función, PEEK puede utilizarse en 
el argumento de un comando. Por ejem- 
plo: 

PRINT PEEK{400G) 

mostrará en pantalla el contenido de la 
posición de memoria número 4000. 

Con los comandos PEEK y PGKE se 
puede acceder a cualquier posición de 
la memoria. Hay que tener en cuenta 
que la ROM, al ser su contenido fijo y 
no modificadle, no permitirá el uso de 
POKE. 



Ocupación de memoria 

Cuando se desea uti fizar rutinas en 
código máquina como complemento de 
un programa BASIC, es necesario con- 
trolar el espacio de memoria en uso. 
Ello también es de gran utilidad cuando 
se está introduciendo un programa muy 
largo y nos acercamos al límite de me- 
moria. 

El BASIC incluye una función capaz 
de revelar el número de bytes libres Se 
trata de la función FRE. Esta admite un 
dato como argumento; si bien, el referi- 
do dato no afecta al funcionamiento de 
FRE. Por ello, suele utilizarse FRE(O) 
para obtener la cantidad de memoria 
que aún no ha sido ocupada. 

Cabe precisar que el dato proporcio- 
nado por FRE se refiere únicamente a la 
zona de memoria reservada a los pro- 
gramas BASIC; por lo que su respuesta 
no contempla la zona de variables BA- 
SIC, y mucho menos a los segmentos de 
memoria reservados al sistema. 



Se ha indicado anteriormente que las 
rutinas en código máquina se suelen si- 
tuar en la parte de memoria dedicada al 
BASIC. Ello exige adoptar una primera 
precaución: evitar que se mezclen ruti- 
nas en código máquina y programas BA- 
SIC. Al efecto, existe normalmente una 
variable del sistema que contiene el va- 
lor de la posición de memoria que mar- 
ca el límite de la zona de programa. Este 
límite no puede ser rebasado durante el 
proceso de introducción de un programa 
BASIC, Así pues, es un buen método si- 
tuar esas rutinas a continuación de di- 
cho límite. Aunque elle no es siempre 
posible, puesto que la memoria situada 
a continuación puede servir para otro 
cometido. En tal caso, el truco consiste 
en ^engañar» a la máquina deciéndole 
que la zona de programa acaba antes de 
lo estipulado. Para lograrlo hay que 
cambiar el valor de la posición límite, 
accediendo a la adecuada variable del 
sistema 

Esta misma operación puede realizar- 
se directamente por medio de un co- 
mando BASIC. Dicho comando se invo- 
ca mediante la palabra clave CLEAR. 

El comando CLEAR suele tener un do- 
ble cometido: por una parte se encarga 
de poner a cero todas las variables del 
programa, y por otra se ocupa de definir 
el límite anteriormente indicado. Esto 
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La memona RAM se subdivide en 
varias zonas, de las cuales unas son 
utilizadas por el BASIC mientras que 
otras quedan reservadas para uso 
exclusivo del sistema. 



último se consigue especificando la 
nueva posición límite en su argumento. 
En general, la formulación de una 



Extrae el contenido de la posición de memoria indicada. 

Formato: PEEK |<posición>) 

Ejemplos: 20 LET D=PEEK(3250G) 

70 PRIMT PEEK(2GOO) 



Deposita un dato numérico en Ja posición de memoria 

Formato: PGKE <posición> r <dato numérico> 

Ejemplos: 10 P0KE 32 500, DATO 
50 PGKE 2000 r 22 



en su erg u memo. 
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instrucción CLEAR coincide con la si- 
guiente; 

(Número de línea) CLEAR [,<posic¡ón>] 

En ella, la cláusula <posición> indi- 
ca la posición de memoria que se ha de 
tomar como límite para la zona de pro- 
grama. 

Al igual que suele ocurrir con muchos 
otros comandos BASIC, CLEAR no rea- 
liza la misma función en todos los apa- 
ratos. Cada ordenador tiene, como ya se 
ha señalado, una distribución de memo- 
ria diferente, lo que implica que la zona 
de BASIC puede estar situada en distin- 
tas posiciones. Además, es posible que 
el límite modificado con CLEAR no co- 
rresponda a la zona de programas, sino 
a la de variables BASIC. 



Utilizando rutinas en código 
máquina 

002 Supongaqueyasehadiseñadolaru- 
tina en código máquina. Se han tradu- 
cido las instrucciones a sus correspon- 
dientes códigos numéricos, y se han si- 
tuado éstos en las posiciones de memo- 
ria adecuadas, medíante comandos 
POKE r Ahora ya sólo falta utilizarla. 

El BASIC contempla dos formas de 
[¡amar a una rutina en código máquina. 
La primera y más elemental hace uso 
del comando CALL. Para emplear CALL 
es necesario conocer la posición de me- 
moria en la que comienza la rutina en 
cuestión, posición que se ha de indicar 
en el argumento de CALL, Su formato 
muestra el siguiente aspecto: 

t Número de línea) CALL <posicíón de 
memoria> [{<parámetro>[,<paráme- 
tro>, ...]»] 

Cuando la secuencia de ejecución del 
programa tropieza con un comando 
CALL, el control se transfiere a la ruti- 
na especificada. Al terminar !a ejecu- 
ción de la misma, la secuencia de pro- 
ceso retorna a la instrucción BASIC si- 
tuada a continuación de CALL. Se ob- 
serva pues que CALL actúa como una 
llamada a subrutina; equivalente a GO- 
SUB, pero con la salvedad de que, míen- 




— ! POKE 3420 j 71 





■ El comando POKE $e encarga de depositar un dato numérico en una determinada 
posición de memoria especificada en su argumento. 



tras GOSUB llama a una subrutina BA- 
SIC, CALL hace lo propio con una sub- 
rutina escrita en código máquina. 

El comando CALL no sólo sirve para 
llamar a una subrutina, sino que puede 
realizar esa llamada «pasando un pará- 
metro». 




Barra el contenida de todas las variables del BASIC. 
Opcionalmente sitúa el límite de la zona de BASIC. 

Formato: CLEAR [<posición>] 

Ejemplos: 20 CLEAR 

70 CLEAR 33450 




Proporciona el número de bytes que quedan sin utilizar. 

Formato: FRE(0) 

Ejemplos: 20 PRINT FRE(Ü) 

70 LET UBRE=FRE(0¡ 



Si la rutina en código máquina nece- 
sita que se le proporcione dato, éste 
puede ser mandado, desde el programa 
BASIC, a modo de «parámetro». Dicho 
parámetro será un dato que utilizará la 
rutina en código máquina para elaborar 
sus cálculos. Es posible mandar varios 
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El comando PEEK es el encargado di 
recuperar un dato almacenado en 
una posición de ¡a memoria principal 
del ordenador. 




PEEK 

(3420) 



parámetros, si bien el uso que se haga 
de ellos dependerá exclusivamente del 
funcionamiento de la rutina. 

Existe un método alternativo para uti- 
lizar rutinas en código máquina dentro 
de un programa BASIC: se trata de uti- 
lizar dichas rutinas como funciones de- 
finidas por el usuario. 

Funciones de usuario en código 
máquina 

Es posible la definición de otro tipo de 
funciones aparte de las declaradas a 
través de DEF FKL 

Si aquellas eran creadas bajo el ám- 
bito del BASIC, estas nuevas funciones 
se escriben en código máquina, aunque 
el modo de operación es similar. Previa- 
mente hay que memorrzar la rutina que 
realiza fas operaciones pertinentes en el 
lugar apropiado. Con la rutina situada 
en una posición de memoria conocida, 




El comando CLEAR puede ser 
empleado para alterar la posición 
límite de la zona BASIC. Con elfo se 
reserva espacio para rutinas en 
código máquina. 

el resto se hace directamente desde el 
BASIC. Para empezar, se ha de definir 
la función en código máquina; y como 




Efectúa una llamada a una subrutina en código máquina situada en la posición que se indica. 
Formato: CALL <posición> 



quiera que la rutina ya está creada, sólo 
falta indicar su dirección de comienzo. 
Ello se consigue utilizando el comando 
DEF USR cuyo formato coincide con: 

(Número de línea) DEF USRCdígi- 
1 0 >"<d i rec c i ó n> 

En el formato se observan dos datos 
a especificar. Por una parte, el denomi- 
nado <dígito>: dato que servirá para di- 
ferenciar unas funciones de otras. Como 
se trata de un sólo dígito, sólo se podrán 
definir diez funciones en código máqui- 
na al mismo tiempo. De todas formas, 
este número se revela más que suficien- 
te en la mayor parte de los casos. 

Ef otro dato hace referencia a la di- 
rección de comienzo de la rutina en có- 
digo máquina. Así pues, los siguientes 
serían ejemplos válidos de definición de 
funciones de esta categoría: 

10 DEF USR 1=33450 
20 DEF USR3-100D 
30 DEF USR6=23 

Los ejemplos definen las funciones de 
usuario USR1, USR3 y USR6, cuyas ru- 
tinas en código máquina comienzan en 
las posiciones 33450, 1000 y 23, res- 
pectivamente. Como es lógico, en esas 
direcciones se deben encontrar las co- 
respondíentes rutinas. 

Este es el método a seguir para defi- 
nir las funciones. Para utilizarlas basta- 
rá con invocar el nombre que se ha uti- 
lizado en la definición. Al tratarse de 
funciones, éstas deben figurar dentro de 
sentencias de asignación o deben estar 
precedidas por comandos. Por ejemplo: 

180 LETA=USR1(10) 

200 LEÍ 8=A+USR3|A) 

300 PRINT USR6|B) 



Ejemplos: 10 CALL 32500 




Proporciona un dato calculado en una rutina escrita en código máquina. 

F oí malo: USR<dígito>f<parámetro> ) 

Ejemplos: 20 PRINT USR1Í35) 

70 LET L!BRE=USR3tA$ 



Se observa que, al igual que ocurre 
con casi todas las funciones BASIC, és- 
tas se acompañan de un parámetro si- 
tuado entre paréntesis en su argumen- 
to, En realidad, las rutinas en código 
máquina explotadas de acuerdo a este 
método pueden emplear dos tipos de pa- 
rámetros. 

Por un lado, hay que hablar del pará- 
metro de entrada, ya comentado. Este es 
idéntico al que admite opcionalmente el 
comando CALL. Se trata pues de un dato 
que se le transfiere a la rutina en códi- 
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I” CALL 

h 

2 - LLAMADA A RUTINA 
CODIGO MAQUINA 



3.- EJECUCION 
DE LA RUTINA 



Para pasar el control de la ejecución 
del BASIC a una rutina de código 
máquina se hace uso 
def comando CALÍ 
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FRE(0)»Í| 

La /unción FRE(O) proporciona el 
I número de bytes libres que existen 
en la memoria RAM a disposición de 
los programas que desee introducir 
el usuario. 

go máquina para que ésta lo procese. El 
otro tipo de parámetro consiste en el 
dato de salida proporcionado por la pro- 
pia rutina; dato que se asigna a la va- 
riable {si está en una sentencia de asig- 
nación) o se muestra por pantalla (si se 
encuentra como argumento de un 
PRINT), Esta última posibilidad no la fa- 
cilitaba el uso de CALL. 

Todas las características relativas a 
los parámetros de estas funciones vie- 
nen marcadas por la correspondiente 
rutina en código máquina. 



Almacenamiento y recuperación 
de rutinas en código máquina 

Las rutinas en código máquina se si- 
túan en una zona bien determinada de 




Define una función de usuario utilizando una rutina en código máquina. 

Formato: DEF U Sñ<díg ito>=<posi c ió n> 

Ejemplos: 20 DEF US R 3=32500 
70 DEF US R 7=23 




Almacena una porción de Ea memoria en un soporte de almacenamiento externo. 

Formato: BSAV£<nombre> í <inicio>,<bytes> 

Ejemplos: 50 BSAVE "RUTINA”, 32500,500 
85 8SAVE Tir ,2000, 20 



la memoria. Siguiendo los pasos co- 
mentados anteriormente (uso de CLEAR 
para abrir espacio en la memoria), exis- 
te una diferenciación entre el programa 
BASIC y las rutinas en código máquina. 
Aparte de su distinta naturaleza, residen 
en zonas de memoria separadas. Ello 
implica que el empleo del comando 
NEW alterará la zona de programa, pero 
no la de rutinas. Para borrar estas últi- 
mas es necesario restablecer el limite 
inicial por medio de CLEAR. 

Otro problema lo constituye la intro- 
ducción de las rutinas. Esta operación 
se suele realizar mediante un programa 
«cargador», en el que se toman los có- 
digos de la rutina de una sentencia 
DATA. 

El referido programa puede servir 
para volver a crear la rutina: guardán- 
dolo en un soporte de almacenamiento 
externo, el programa cargador permane- 



cerá siempre a disposición del progra- 
mador. 

Para volver a introducir la rutina ha- 
brá que cargar dicho programa (con 
LOAD) y posteriormente ejecutarlo (con 
RUN). Si la rutina en código máquina 
esté asociada a un segundo programa 
BASICh éste deberá cargarse a continua- 
ción. 

Lo que sigue es un ejemplo genera! 
de un cargador de código máquina 

10 CLEAR <posición límite> 

20 FOR Imposición jnic¡al> TO <posición finaO 
30 READ A 
40 P0KE I, A 
50 NEXT I 

60 DATA <códigos„> 

70 NEW 

El programa sintetiza todos los pasos 
necesarios para situar en memoria e 




| El comando 
I BSA VE 
I permite 
I grabar 
I rutinas en 
I código 
I mequvoe en 
I un sopone 
I de 

I almacena- 
I miento 
1 externo 
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Carga en memoria una rutina en código máquina o una zona de memoria cualquiera. 

Formato: BLGAD <nom brs>I r <posíc i ón iniciaO] 

Ejemplos: 20 BLOAD J RUTINA" 

70 BLOAD ' J CM Jr r 3300Ü 




rutina y el programa BASIC que la 
acompaña. La línea 10 fija el nuevo lí- 
mite que reserva espacio para la rutina. 
Las líneas comprendidas entre la 20 y 
la 60 (ambas inclusive) cargan la rutina 
en código máquina. Por último, la línea 
70 destruye el programa cargador, de- 
jando todo listo para la introducción del 
programa BASIC que haga uso de la ru- 
tina creada. 

Se podrían crear varios programas de 
este tipo, cargando en cada uno de ellos 
una o varias rutinas en código máquina. 
Estos programas son fácilmente alma- 
cenadles y recuperables con los conoci- 
dos comandos SAVE y LOAD. 

Sin embargo, lo idóneo sería almace- 
nar el segmento de memoria que con- 
tiene las susodichas rutinas. Pues bien, 
esto es factible. Para ello han de intro- 
ducirse dos nuevos comandos BASIC. El 
primero es un comando capaz de alma- 
cenar parte del contenido de la memo- 
ria en un dispositivo externo; se trata de 
BSAVE (de Binary SAVE: almacena- 
miento binario). BSAVE almacena cual- 
quier porción de la memoria tratándola 
como una lista de bytes. Así pues, la 
porción de memoria estipulada se guar- 
dará byte a byte en el soporte de alma- 
cenamiento externo. 

Dicho comando incluye en su argu- 



mento, junto con el nombre del archivo 
a crear, dos datos que especifican la 
zona de memoria que se almacenará. Su 
formato es el siguiente: 

(Número de línea) BSAVE <nombre>, 
<dirección fniciai>, <número de bytes> 

Donde <nombre> debe especificar ei 
nombre del archivo en el que va a resi- 
dir la información, mientras que<direc- 
ción inicial> muestra el byte de comien- 
zo de la zona de memoria a almacenar. 
El tercer dato aporta la longitud de la 
misma, medida en bytes. 

Por ejemplo, para guardar una rutina 
en código máquina cuya dirección de co- 
mienzo es la 32500 y que agrupa a 1 50 
bytes, basta con ejecutar la siguiente 
instrucción: 

BSAVE "RUT1 ",32500,1 50 

La referida información se deposita, 
en nuestro ejemplo, en un archivo cuyo 
nombre es "RUTV F . 

Las rutinas así almacenadas pueden 
ser devueltas a la memoria del ordena- 
dor por medio def comando BLOAD. El 
formato general de este nuevo coman- 
do es el siguiente: 



{Número de línea) BLOAD <nombre> 
[,<dírección inicíal>] 

Como en el caso anterior <nombre 
indica el nombre del archivo que, er 
este caso, se desea cargar en memoria 
El segundo argumento señala, opciona * 
mente, la nueva dirección de comienzo 
Este último dato permite ubicar la mis- 
ma rutina en una posición diferente. S 
no se especifica la dirección de comien- 
zo, se cargará en el mismo lugar del que 
la rutina fue leída y grabada en la un - 
dad externa con BSAVE, 

Como se observa, el modo de funcio- 
namiento de BSAVE y BLOAD es mu. 
parecido al de SAVE y LOAD. Utilizando 
estos nuevos comandos para el almace- 
namiento y recuperación de rutinas er 
código máquina, se puede crear con co- 
modidad una biblioteca de rutinas de 
esta categoría. 

El programa que se encargaba de s - 
tuar en memoria la rutina en código má- 
quina se simplifica en gran medida con 
el uso de BLOAD. Este sería el aspeci: 
del nuevo programa cargador: 




VARPTR 



La función VARPTR sirve para ' 
localizar ¡a posición de memoria en la 
que se almacena el contenido de una 
variable dada . 
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TABLA DE CONVERSION 



Ordenador 


Acceso a 
posiciones de 
memoria 


Espacio de memoria 


Llamada a 
rutinas en 
código máquina 


Almacenamiento y recuperación 
de rutinas en C. M, 


Localiza- 
ción de 
variables 




POKE 


PEEK 


FRE (0) 


CLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


AMSTRAD 


POKE 


PEEK 


FRÉ (0) 


MEMORY 


CALL 


- 


SAVE XnomXV 
B, <rango> 


LOAD Xnom >V 
<dir. carga> 


- 


APPLE II 
APPLESOFT) 


POKE 


PEEK 


FRE (0) 


HIMEM 


CALL/USR 


- 


BSAVE 


BLOAD 


- 


APRICOT 

M-BASIC) 


POKE 


PEEK 


FRE fO) 


OLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


ATAR1 


POKE 


PEEK 


FRE (0) 


- 


USR 


- 


- 


- 


ADR (<var»¡ 


CBM 64 


POKE 


PEEK 


FRE (0) 


- 


USR 


- 


- 


- 


- 


DRAGON 


POKE 


PEEK 


MEM 


CLEAR 


- 


DEFUSR 


- 




VARPTR 


EQUIPOS MSX 


POKE 


PEEK 


FRE (0) 


OLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


HP-1 50 


POKE 


PEEK 


FRE (0) 


CLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


BM PC 


POKE 


PEEK 


FRE (0) 


CLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


MPF 


POKE 


PEEK 


FRE (0| 


Sólo borra variables 


- 


- 


- 


- 




VCR DM-V 
MS-BASIC) 


POKE 


PEEK 


FRE (0) 


CLEAR 


CALL 


DEFUSR 


- 


- 


VARPTR 


NEW BRAIN 


POKE 


PEEK 


FREE 


Sólo borra variables 


CALL 


- 


- 


- 


. — 


ORIC 


POKE 


PEEK 


FRE (0) 


HIMEM 


CALL 


DEFUSR 


~ 


— 


- 


SHARP MZ-700 
MZ- BASIC) 


í POKE 


PEEK 


SIZE 


L1MIT 


USR 


- 


- 




- 


SINCLAIR QL 


POKE 


PEEK 


- 


Sólo borra variables 


CALL 


- 


SBYTES 


LBYTES 


- 


5PECTRAVIDEO 


POKE 


PEEK 


FRE (0) 


CLEAR 


CALL 


DEFUSR 


BSAVE 


BLOAD 


VARPTR 


ZX'SPECTRUM 


POKE 


PEEK 


— 


CLEAR 


USR 


- 


SAVE "<nom>" 
CODE 


LOAD ”<nom>" 
CODE 


— 



OBSERVACIONES: 

<rango> indica la zona de memoria a salvar. 

: <dir. carga> indica la posición inicial donde se cargará el programa. 



I I "LEAR <posición Jímite> 

| Z 3L0AD <nombre del arctiivo> 

| Z NEW 

realización de variables Proporciona la posición de memoria en la que se almacena el contenido de una variable. 

El modo de averiguar la posición en la VARPTR (<variab | e>) 

[ :i_e se situé el contenido de una vana- 

: i implica el uso de una nueva función £ ■ hs . 20 L£T A=VAR p TR(BL t) 

^SIC: VARPTR, cuyo formato ofrece el ^0 ppufjj VARPTR(A) 

I sguiente aspecto; 
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MICROPROCESADOR 



ORDENES 
PARA CONTROL 
DE LOS OTROS 
ELEMENTOS DEL 

ordenador 



DATOS 



(Número de línea) LET <variable numé- 
nca>=VARPTR «nombre de variable» 



VARPTR es una función, lo cual sig- 
nifica que debe ir dentro de una senten- 
cia de asignación, o como argumento de 
un comando u otra función. En el for- 
mato se ha situado dentro de una sen- 
tencia de asignación, por lo que el dato 



proporcionado por VARPTR se deposita- 
rá en la variable que acompaña a LET. 

Dentro del argumento de VARPTR se 
indica el nombre de la variable a loca- 
lizar, esto es: de la variable cuya posi- 
ción de memoria se desea conocer. 

La función VARPTR también puede 
ser utilizada para pasar una posición de 
memoria como dato destinado a una ru- 
tina en código máquina. En el ejemplo 



que se muestra a continuación se maní 
da como parámetro la posición en Ja - js 
se almacena la variable A$: 

150 PRINT USR5(VARPTR(A$)) 

Al igual que Jos restantes comarca 
y funciones introducidos en este cap - .- 
lo, VARPTR será de especial ínterJ 
para programadores experimentados 



El microprocesador: un 
«cerebro» electrónico 
integrado 



La revolución informática es un hecho cuyo origen se 
encuentra en el vertiginoso avance de la electrónica. 
Aún está reciente en el tiempo la época en que la 
tecnología electrónica se edificaba por completo sobre 
las voluminosas y frágiles válvulas de vacío. Pronto, 
llegaron los semiconductores, con el transistor al frente; 
su reducido volumen y consumo energético no tardó en 
relegar a las válvulas casi al olvido. £1 tercer peldaño lo 
aportó el desarrollo de la microelectrónica. Con ella se 
abría un nuevo horizonte de evolución, tan amplio como 
creciente ha sido el nivel de integración hacia el que 
avanzaron los circuitos electrónicos. 

Hada finales de la década de los 60, se crearon los 
primeros circuitos integrados LSI (Large Scale 
Integraban], de alta escala de integración. Circuitos que 
alojaban cerca de 10.000 transistores o componentes 
electrónicos activos en una superficie inferior a un 
centímetro cuadrado, 

Ef avance no se detuvo y en el mes de noviembre de 
1 971 irrumpió en los canales comerciales un chip» 
cuya referencia era INTEL 4004: ef primer 
microprocesador. En la actualidad -con poco más de 



una década por medio— se producen chips que integran 
más de cien mil componentes activos y han visto la luí 
un considerable número de microprocesadores de 8, 1 6 
e incluso de 32 bits. 

En sus orígenes, el microprocesador nació como 
alternativa a la multiplicidad de circuitos integrados 
lógicos, orientados a aplicaciones específicas, que 
debían fabricarse en series reducidas y de dudosa 
rentabilidad. 



Muy pronto, su versatilidad proyectó al microproces&x 
en el mundo informático. Este pasó a convertirse en ta 
unidad central de proceso de los microordenadores. lr 
*micrc-cerebro» encargado de ia manipulación y 
tratamiento de los datos, del control de las operaciones 
y de la coordinación de la actividad del conjunto de 
dispositivos que dan cuerpo al ordenador. Todo ello, ce 
acuerdo a las órdenes que derivan de la ejecución de 
una secuencia de instrucciones denominada programa 



□ □□ 

DATOS 

PROCESADOS 



INSTRUCC 



RECONOCIMIENTO 
DE INSTRUCCIONES Y 
TRATAMIENTO 
DE DATOS 
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BASIC 

avanzado 



Gestión de 

interrupciones y teclas 
de función 






a ejecución se- 
cuencia! de las lí- 
neas de un pro- 
grama escrito en 
BASIC, no permite 
r control del mismo en consonancia 
tan el tiempo real. Así, normalmente, 
o será posible llevar a cabo una deter- 
minada acción en el mismo momento en 
f que se produce la situación que da lu- 
;ar a ello, sino que será necesario es- 
terar a que el programa llegue a la lí- 
-ea en la que se ha codificado la detec- 
: ón de dicho evento, con lo que siem- 
:'e se producirá un cierto retraso. 

Un ejemplo puede ser el siguiente, 
suponga que se tiene un ordenador co- 
-sctado, mediante la interface adecúa- 
la, a un detector de la presión de una 
taldera de vapor. El ordenador debe 
centro lar mediante un programa BASIC 
ue la presión de la caldera no supere 
cierto valor máximo, de peligro, y ex- 
: ote en consecuencia. Si se alcanza 
ese valor máximo, el ordenador debe dar 
_na señal de aviso, o bien actuar sobre 
= caldera, mediante otra interface apro- 
: ada, para bajar la presión. 

_a programación de este objetivo pue- 
ae ser tan simple como ordenar una lec- 
jra continua del vapor de la presión de 
a caldera, y comprobar si ha superado 
- valor máximo. Aunque bien es cierto 
rje utilizar a todo un señor ordenador 
te" sólo para este cometido puede ser 
jrt gran lujo. Lo habitual es que, a la 
*ez T se puedan ejecutar otro tipo de pro- 
ramas y, cada cierto intervalo de tíem- 
:: detener la ejecución de estos para 
cedicar unos breves instantes al que 
cintróla la caldera. 

Como es fácil intuir, puede suceder 
:js uno de ios otros programas demore 
demasiado en su ejecución y cuando se 
rente examinar la presión de la calde- 
^ sea ya demasiado tarde. El resultado 
es fácil de imaginar. Puesto que no se 
rjsde prever el momento preciso en el 
r_e se alcanza esa situación, se pece- 
ra alguna técnica que permita «ínte- 
-jmpir» al ordenador en el preciso mo- 
mento en el que se produzca el hecho 
debe ser atendido con prioridad. 

Esta técnica no es otra que la del uso 
5E ras interrupciones hardware del mi- 
r:orocesador r Su explicación detallada 
-rgiría entrar en el campo del código 




Mediante el comando <evento> OFF 
se pueden desactivar 
las interrupciones hasta ei instante 
en ef que se ejecute la orden 
<evento> ON. 



máquina, lo que se sale fuera del obje- 
tivo de esta obra. Mo obstante, sin lle- 
gar a las profundidades del hardware ni 
a situaciones tan drásticas como las del 
empleo anterior, también es posible 
desde el BASIC la técnica de las inte- 
rrupciones. 



Interrupciones en BASIC 

Existen tres situaciones habituales 
que permiten «interrumpir» la ejecución 




ías interrupciones permiten detener 
fa ejecución de un programa para 
atender a una rutina de tratamiento 
del suceso que ha provocado la 
interrupción , 



de un programa BASIC. Estas son las s - 
guientes: la finalización de un determi- 
nado intervalo de tiempo, que se 
dona con la palabra clave INTERVA_ a 
acción sobre determinadas teclas óe 
función especiales, anexas al teclado 
normal, y controladas por la palabra c e- 
ve KEY, y la pulsación de fa tecla S“C- 
(nor malmente junto con la tecla CON- 
TROL}, cuya palabra de control es S”C ~ 
Cualquiera de estos eventos puede 
generar una interrupción instarían- 
del programa BASIC en curso. Caca 
de ellos necesitará entonces una 
adecuada para el tratamiento de ese "- 
terrupción, rutina que se selecciona ri- 
el siguiente comando: 

<N!>ON<evento>GOSUB 
<nl.>[,<nl. >,...] 

En ella, el <evento> puede se- - - 
quiera de las siguientes palabras : = e 
INTERVAL, KEY ó STOP, 

En el caso de INTERVAL se csz-e ssie- 
cificar además ei número de c r :_r-e- 
avos de segundo que se desea i.e 
transcurran antes de produce 5 
rrupción. Por ejemplo, la línea 

10 QN INTER VAL=20G G03UB 1000 

producirá la interrupción ce t t;E-£ 
BASIC que se esté ejecutare: e ~-- 
valos de cuatro segundos, a: e:: :-e 
se ejecute la subrutina ce : 
situada en la línea 1,002 

Si se desea interrum: - e :::s-s 
cuando se pulse alguna ze as te: s s es- 
peciales de función, se e— z ss - a i - 
guíente formulación, ind uycnto i** nu- 
mero de línea asociact a z se - er-c 
de cada una de las ce: es :n 

que existan. Así, si son : :: ¿r e: es 
de función, la sigu e-te f E-5 : 

10 0N KEY GQSUB 100 2X “C 

hará que se ejecute : ^ - s la lí- 
nea 100 al pulsar a : - e :e: = . la de 

la línea 200 si se s ’cij nda, y 

así sucesivamente _s tecla de 

función no produ: e zn algu- 

na, pues no se “ = n: zezt e “^merode 
línea asociado s s_ - s e~t: No obs- 
tante, es ob igat: - : estea' su posi- 
ción, por lo que se -= -e:*esen lado la 
«coma» córrese:' : e^e Normalmente, 
existirán baste :t: e: s: ze función. 
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I Con INTERVAL es posible generar 
una interrupción del programa 
principal cada vez que finalice un 
cierto intervalo de tiempo. 

por lo que se pueden codificar otras tan- 
tas rutinas de tratamiento. Tal posibili- 
dad resultará muy útil para facilitar el 
control directo de un programa por me- 
dio de ellas. 

La instrucción <evento>: STOP no 
necesita parámetros suplementarios y 
será útil para interrumpir la ejecución 
de un programa mediante la pulsación 
de ía tecla STOP. 

En cualquiera de los casos señalados, 
la interrupción se produce una vez que 
se termina de ejecutar ía sentencia BA- 
SIC en curso. Acto seguido salta la eje- 
cución a la subrutina correspondiente y, 
tras ello, se retorna la instrucción si- 
guiente a la que se estaba ejecutando 
cuando se produjo la interrupción. 

Una vez programadas todas estas in- 
terrupciones, es posible también progra- 
mar su aceptación o no en un momento 
determinado. Ello se debe realizar por 
medio de la siguiente instrucción BA- 
SIC: 

<N I Xe ve nto>[ON ][OF F][STO P] 

En la que <evento> puede ser uno 
cualquiera de INTERVAL, KEY, STOP, 
STRIG o SPRITE (estos dos últimos des- 



KEY 




El comando KEY permite programar ¡as teclas de función, 
modificando sus contenidos 



critos en el capítulo «Control de perifé- 
ricos»), e irá seguido por algunas de las 
palabras alternativas indicadas en el 
formato (OIM, OFF, STOP). Previa a la 
ejecución de esta sentencia, debe ha- 
berse ejecutado la correspondiente ins- 
trucción ON<evento>GOSUB. Si el 
<evento> es KEY será preciso especifi- 
car detrás de él, y entre paréntesis, el 
número de tecla de función correspon- 
diente. 

La opción ON activa y permite !a inte- 



rrupción, de modo que ésta tendrá luga' 
si se produce a partir de entonces si 
<evento> particular. Para desactiva I 
una interrupción, se debe elegir la ac- 
ción OFF, con lo que el ordenador ign:- ¡ 
rara los eventos producidos a partir oe 
ese momento. 

La opción STOP permite desinhibir 
interrupciones, pero éstas serán anota- j 
das internamente para generarlas 
cuanto se ejecute una nueva opción O 1 * 
para ese mismo <evento>. 




Bifurca a una subrutina ai producirse una interrupción provocada por el <evento> indicado. 
<evento&>: STRIG, SPRITE, STOP, KEY, INTERVAL 

Formato: On <evento>: {=<num >j GOSUB < nl.>[ <nl>] 

Ejemplos: 10 ON INTERVAL=1Ü0 GOSUB 1000 
30 0N KEY G0SUR 100, 200, 300 

Nota: <num.>= número de cincuenta-aves de sg. para INTERVAL 



<evento> ON OFF/STOP 



i 



Activa o desactiva momentáneamente la interrupción asociada aKevento> indicado. Tiene relación con el comando O* 
<evento> GOSUB. 

<eventos>: STRIG, SPRITE, STOP, KEY, INTERVAL 



Formato: <e vento>fO N/0 FF/ST 0 PJ 

Ejemplos: 10 KEY(3) OFF 

20 INTERVAL STOP 
30 STOP ON 
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Estos son algunos ejemplos que 
-muestran la posible sintaxis de este tipo 
fe instrucción: 

TQ KEY(2) GN 
“00 INTER VAL STOP 
50 STOP OFF 



KEY 

Redefine \ñ cadena de caracteres que se generará al pulsar las teclas de función. 
Formato: KEY Cnum. de teela>, <cadena> 




La línea 10 permite poner en estado 
da autorización las interrupciones gene- 
radas al pulsar la tecla de función 2, La 
inea 100 impedirá momentáneamente 
as interrupciones periódicas generadas 
cada intervalo de tiempo indicado; éstas 
se producirán cuando se ejecute poste- 
riormente una semencia INTERVALON. 
D or último, la línea 50 hará que sean ig- 
noradas las interrupciones generadas 
por medio de la tecla STOP. 



Ejemplos: 10 KEY 1, 'MJIf +CHR$113) 
20 KEY 2/'" 

30 KEY N, Z$ 




Borra o imprime en pantalla la línea con los contenidos de las diferentes teclas de función. 
Formato: KEYfON/OFF] 



las teclas de función 

A cada una de las teclas de función 
se le puede asignar no sólo el carácter 
que desee el usuario, sino incluso una 
:adena de hasta 1 6 caracteres en mu- 
chos casos, además de caracteres de 
control. 

El comando BASIC que permite asig- 
nar una determinada cadena a una de 
estas teclas es el que sigue: 

«ey <num. de tecla>, <cadena> 

Donde el <num, de tecía> es el que 
normalmente tiene asignado la tecla de 
función cuyo cometido se quiere modi- 
"car, y <cadena> es el nuevo texto a 
asignarle. 

Así, por ejemplo, si se desea que al 
rulsar la tecla de función 1 se ejecute 
ai comando RUN<CR>, es suficiente 
:on indicar a la máquina: 

GY1/W'+CHR$[131 

En dicha orden se asume que 
THR$[13) es el carácter correspondien- 

a la acción del retorno de carro (ac- 
:¡ón habitual de la tecla RETURN o EN- 
TER). 

Por este sencillo método se habrá 
asignado a la teda de función 1 la mi- 
sión de ejecutar un programa BASIC, sin 
:ue haya necesidad de escribir letra por 
tetra el comando RUN y pulsar después 
3 tecla RETURN. Ahora, con sólo pul- 
sar la tecla de función 1 r se ejecutará di- 



Ejemplos: 10 KEY OFF 
50 KEY 0N 

rectamente el programa que resida en 
la memoria. 

Para hacer que una de las teclas de 
función no ejecute nada, es decir que 
quede inactiva, no habrá más que asig- 
narle la cadena nula como se indi- 
ca en el siguiente ejemplo: 

KEY ior 



Las posibles aplicaciones de las te- 
clas de función son inagotables. Son 
útiles, por ejemplo, para imprimir textos 
que se repitan con cierta frecuencia, o 
datos como el nombre del usuario, o los 
comando de uso más frecuentes, como 
AUTO, LIST, LOAD, SAVE... 

Los ordenadores que poseen estas te- 
clas de control suelen asignarles nor- 




I La presencsa de teclas de función programadles por el usuario es un detalle 
frecuente en los modernos microordenadores . tanto de tipo doméstico 
como profesional. En la fotografía se observan las ocho teclas de función 
(en color azul) del microordenador ENTERPRISE. 
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TABLA DE CONVERSION 



Ordenador 


Interrupciones 


Teclas de 
función 


Conversión 
de código 


WIDTH 




ON <even- 
to> GOSUB 

<nl,> 

E <nl.>] 


<evento> 

[GN/ÜFF/ 

STOP] 


KEY 

<nüm.>, 

<var$>. 


KEY 

[LIST/ON/ 

OFF] 


HEXS 

(<núm>) 


OCTS 

{<núm.>) 


BINS 

«núm.>} 


WIDTH 

{<núm.>} 


AMSTRAD 


EVERY/ 

AFTER 


DI/EI [2) 


KEY 

<núm>, 

<var$> r 


- 


HEXS 

(<núm>) 


- 


BINS 

(<núm.>) 


MODE 


Apple II 
(APPLESOFT) 


- 


- 


- 


- 


, - 


- 


- 


- 


APRICOT 

(M-BASIC) 


- 


— 




- 


HEX$ 

(<núm.>) 


0CT$ 

(<núm.>) 


- 


WIDTH 
[LPRINT] 
«núm.» (1) 


ATAR! 


- 






- 


- 


- 


- 


— 


CBM 64 


- 


- 


- 


- 


- 


- 




— 


DRAGON 


- 




- 


- 


HEX$ 

(<núm>] 


- 


- 


- 


EQUIPOS 

MSX 


ON 

<evento> 

GOSUB 

<nl> 

[ <nl.>] 


<evento> 

[ON/OFF/ 

STOP] 


KEY 

<num>, 

<var$> r 


KEY 

[LIST/ON/ 

OFF] 


HEX$ 

(<núm>) 


0CT$ 

(<núm.>) 


BIN$ 

fcTiúm.>) 


WIDTH 

(<núm>) 


HP-150 


- 


- 


- 


- 


HEX$ 

«núm.>) 


0CT$ 

«núm.>( 


- 


WIDTH 

[LPRINT] 

(<núm>)(1) 


IBM PC 


ON 

<everto> 

GOSUB 


<evento> 
[ON/OFF/ 
STOP] (1) 


KEY 

<núm + > ( 

<var$> r 


KEY 

[LIST/ON/ 

OFF] 


HEX$ 

(<núm>) 


0CT$ 

(<núm.>) 


- 


WIDTH 

<disp> 

(<núm>) 



malmente unas tareas iniciales; éstas 
suelen visualizarse en una zona de la 
pantalla, especialmente reservada para 
ello, ya que suele coincidir con la línea 
inferior. 

Debido al escaso espacio que ofrece 
esta línea, y a que cada tecla de función 
puede tener asociado un texto de hasta 
16 caracteres, este texto no se visuali- 
zará completo en Ja línea de pantalla re- 
servada al efecto. Para ver el contenido 
completo de cada tecla de función se 
dispone del comando KEY LIST, el cual 
proporciona un listado por pantalla de 
los contenidos íntegros de cada tecla. 



Una posible ejecución de este coman- 
do daría lugar a ía siguiente pantalla: 



KEY LIST <CR> 

RUN 
LIST 
SAVE 
AUTO 
SAVE "D: 

LOAD "D: 
CLOAD 
JUAN PEREZ 
SI 
NO 



La existencia de la ¡ínea inferior de Is 
pantalla destinada a recordar el come- 
tido de las tedas de función, disminuye 
el espacio de visuaíízación utilizaba 
para otras finalidades. Para eliminar es- 
tas líneas y así disponer de una panta- 
lla limpia de mensajes se dispone del s - 
guíente comando BASIC: 

KEY [ON] [OFF] 

Mediante la opción OFF se hace de- 
saparecer de la pantaíla Ea línea de sig- 
nificados de las teclas de función, mier- 
tras que para hacerla aparecer de nue- 
vo se utilizará ía opción ON. 
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TABLA DE CONVERSION 



Ordenador 


Interrupciones 


Teclas de 
función 


Conversión 
de código 


Width 




ÜN <even- 
to> GOSUB 
<nL> 

[ <nl>] 


<evento> 

[ON/OFF/ 

STOP] 


KEY 

<núm.> r 

<var$>, 


KEY 

[LIST /ON/ 
OFF] 


HEXS 

(<núm.>) 


OCTS 

(<núm.>) 


BINS 

«núm.» 


WIDTH 

«núm,» 


MPF 


- 


~ 


- 


- 


- 


- 


— 


- 


NCR DM-V 
(MS-BAS1C) 


- 


— 


- 


- 


HEX$ 

«núm.» 


0CT$ 

(<nií(n>) 


- 


WIDT 

[LPRINT] 

«núm» 


NEW BRAIN 


- 


- 


- 


- 


- 


- 


- 


- 


ORIC 


- 


- 


— 


- 


HEX$ 

(<núm.>) 


- 


— 


- 


SHARP 
MZ-700 
MZ- BASIC) 


- ; 


- 


- , 


DEF KEY 

«núm.»= 

<var$> 


KEY LIST 


- 


- 


- 


SINCLAIR QL 


— 


- 


- 


- 


- 


- 


- 


WIDTH 

<disp>, 

(<núm> 


SPECTRA- 

V1DEO 


ON 

<evento> 

GOSUB 

<nl.> 

U<nl>] 


<evento r 

[ON/OFF/ 

STOP] 


KEY 

1 (<núm>), 
<var$> 


KEY 

[LIST/ÜN/ 

OFF] 


HEX$ 

(<núm>) 


OCT$ 

(<núm>) 


BIN$ 

(<núm>) 


WIDTH 

«núm» 


ZX-SPECTRUM 


- 


- 


— 


- 


- 


- 


BIN 


- 



<evento>: cualquiera de los siguientes, STRIG, STOP, KEY, IÍSITERVAU SPRITE, <nl >; numero de línea, <num>: número entero. <var.$>: variable al- 
: anumértca. (1) EE EBM PC admite los siguientes <eventos>: KEY(n), STRING, PEM (lápiz óptico) y COM (comunicaciones). (2) Ea gestión de interrupciones de 
os Amstrad esté tratada a fondo en el capítulo del tercer tomo de BASIC dedicado al Locomotive BASIC. 

<núm>: número entero. <arch>: nombre del archivo. <dir.1> dirección inicial. <dir.2>: dirección final. <ejec>: dirección de ejecución. <off>: direc- 
ción offset para cargar en cualquier zona RAM. <lon>: longitud en direcciones. <disp>: dispositivo o número de arhcivo. (2) Para impresora se usa la opción 
J>RINT. 



ariando la anchura de la pantalla 

El número de columnas visual iza bles 
en pantalla de texto varía según el modo 




de presentación elegido y de acuerdo a 
su resolución máxima. Una resolución 
baja no permitirá más de 20 caracteres 
por línea, o menos en algunos casos; 



mientras que una pantalla de texto de 
alta resolución puede llegar a contener 
hasta 80 caracteres por línea. 

Con independencia de la resolución, 
que será prefijada por medio de coman- 
dos tales como SCREEN, MODE o 
GRAPHICS, interesa en muchos casos 
seleccionar a voluntad la anchura efi- 
caz de la pantalla. De esta forma, será 
posible, por ejemplo, reducir su anchu- 
ra y así poder disponer del espacio de 
pantalla restante para otros meneste- 
res. Al efecto, algunos dialectos del BA- 
SIC inlcuyen un comando específico. 

WIDTH <número de columnas> 



Modifica el número de columnas que se visualizarán en una pantalla de texto o en una impresora. El nuevo formato 
de pantalla queda centrado. 

Formato: WIDTH <núm. de eolumnas> 

Ejemplos : 10 S CREEN 1 ; WIDTH 30 
30 SCREEN 1: WIDTH 10 
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Los sistemas de numeración 



HEX$ f BIN$, OCT$ 



Fundones que dan H a partir de unnúmero entero, la cadena de caracteres equivalente en los sistemas de 
numeración hexadecimales, binario u octal, respectiva menta 

Formato: <V a r$> = [H EX$/ B IN $/ OCT^ (<núm entero>¡ 

Ejemplos: 10 A$=HEX$¡100) 

20 A$-BIN$|&HFF0| 

40 PRINT OCTf|&B1 10101) 



Su utilidad estriba en seleccionar el 
número de columnas que se desean vi- 
sualizar para un determinado modo de 
pantalla de texto. El número de colum- 
nas seleccionado debe estar comprendi- 
do entre 1 y el número máximo de co- 
lumnas admisible para esa resolución 
en modo texto. 

Suponga que se trabaja con una pan- 
talla cuya máxima resolución en modo 
texto es de 20 columnas por línea. Si se 
elige este modo y se visualiza el texto 
PRIMERTITULO, mediante la correspon- 
diente orden (PRINT ''PRIMERTITULO"), 
se obtendrá la siguiente pantalla: 



PRIMERTITULO 



Mientras que si se ejecuta previamen- 
te a la misma orden PRINT, la instruc- 
ción SCREEN 1 ;WIDTH 6 el resultado 
será: 



PRIMER 

TITULO 



Lo primero que se observa es que la 
anchura de la pantalla de textos ha sido 
reducida a 6 columnas, por lo que cada 
seis caracteres visualizados se produce 
un cambio a la línea siguiente Además, 
se observa que el texto así representa- 
do queda centrado, debido a que el co- 
mando WIDTH modifica el número de 
columnas alternativamente a derecha e 
izquierda. 

Una vez seleccionada la anchura, ésta 
quedará normalmente memorizada y en 
activo cada vez que se vuelva a utilizar 
ese modo de textos. 
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El BASIC dispone de ia función BIN$ 
para transformar un número entero 
•' en su equivalente en notación 
binaria o base 2. 



Algunos intérpretes de BASIC per- 
ten obtener los equivalentes binarios es 
números decimales. Como herra rue- 
de ayuda para el manejo de números zo- 
nados, existe una función BASIC cu*i 
cometido es obtener una cadena de 
racteres, compuesta por ceros y uris 
equivalente a la expresión binaria os 
número decimal dado en su argumera 
Esta función tiene el siguiente form~ 

X$=BIN$ (<número entero>) 

La conversión opuesta, es decir e 
paso de binario a decimal, se puede rm- 
lizar en muchos casos con la ya coer- 
cida función VAL, de la siguiente forra 

WUM=VAL(' J &B ,, +X$ 

Siendo X$ la cadena de unos y ce-ir 
que representa el número en binare 
Los signos &B se utilizan para ind ra- 
que se trata de un número en el si so- 
nría binario. Otro sistema de nume^ 
ción, muy utilizado sobre todo por ge 
programadores en código máquina, ese 
hexadecimal. Este sistema utiliza 16 dí- 
gitos diferentes para representar los r 
meros. Los dígitos se obtienen al aña: 
a las 1 0 cifras decimales (del O al 9), -i 
letras de la A a la F. Existe, por tar:: 
otra función especial que obtiene la ca- 
dena de caracteres hexadecimales re- 
presentativa del número decimal da oí 
Esta función tiene el siguiente forma:: 

X$=HEX$ (<número entero>) 

Análogamente el caso binario, para ¡= 
conversión inversa se utilizará ¡a fun- 
ción VAL, aunque especificando ahera 
que se trata de un número en notación 
hexadecimal, mediante los signos ''8t~ 
colocados delante del número en cues- 
tión: 

NUM=VALr&H''+X$) 

El sistema de numeración de base 8 
u OCTAL, es también frecuente en e 
mundo informático. Para él existen ta^ 
bién una función análoga a las BINS * 
HEX$, con las mismas características 
Se trata de OCT$ cuyo formato es idé~ 
tico a los anteriores. 
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Presentación 
de datos 



Ei comando PRINT 
USING 



La presentación de los datos merece un especial cuidado. Para definir sus 
características de presentación , el BASIC dispone de una versátil 
herramienta; el comando PRINT USING. 



n uno de los pri- 
meros capítulos 
del tomo anterior 
se introdujo el co- 
mando PRINT, 
Este comando ha sido utilizado en la 
práctica totalidad de los capítulos de 
este curso de BASIC. Su importancia re- 
sulta obvia, pues casi todo proceso exi- 
ge la presentación de un resultado en 
pantalla. 

Como ya se comentó anteriormente, 
la presentación de datos debe ser obje- 
to de un especial cuidado. Una presen- 
tación que adolezca de estética puede 
anular incluso la efectividad de un de- 
terminado programa. Para evitarlo, cabe 
echar mano a las facilidades que ofrece 
el comando PRINT. 

Un ejemplo del uso del comando 
PRINT puede consistir en la visualiza- 
ción de una lista de nombres y números 
de teléfono Para ello se partirá de dos 
matrices N$() y T{), en las que se en- 
cuentran los datos. La primera rutina 
encargada de mostrar en pantalla estos 
datos puede ser la siguiente: 



5 DEFDBLT 
10 FOR 1=1 T0 5 
20 PRIIMT M$I);T(I) 
30 PJEXT I 



El resultado de la ejecución de este 
programa toma el siguiente aspecto: 



RUN 

MANOLO 2223344 
LUIS 2341100 
PEDRO 4442233 
CARLOS 221122 
JUAN 4005544 



Se comprueba que el formato de sa- 
lida no es el ideal. Cabría desear una 
presentación en la que los números de 
teléfono aparecieran en la misma co- 
lumna de la pantalla. Algo similar a lo 
siguiente: 

MAMOLO 2223344 

LUIS 2341100 

PEDRO 4442233 

CARLOS 221122 

JUAN 4005544 




El empleo de la alternativa PRINT 
USING permite especificar el formato 
en el que serán representados los 
datos en la pantalla, con plena 
comodidad y eficacia para el 



programador. 



PRINT USING: formatos para 
datos numéricos 

La función USING se emplea en con- 
junción con el comando PRINT para es- 
pecificar el formato en el que se van a 
presentar los datos. Dicho formato se 
codifica a continuación de la palabra 
USING, y afecta al resto de los datos 
contenidos en el argumento de la ins- 
trucción PRINT, 

El formato se ha de indicar por medio 
de una cadena de caracteres que ha de 
ajustarse a ciertas reglas específicas. 

En el caso de datos numéricos, se eli- 
ge el número de dígitos a visualizar. Por 
cada posición se escribe un signo de nú- 
mero [#); como quiera que se trata de 
una cadena, dichos signos irán encerra- 
dos entre comillas. A título de ejemplo, 
se muestra una rutina que realiza la 
misma función comentada en el aparta- 
do anterior. 

10 FOR 1=1 TOS 

20 PRINT N$[I);TA8 (10);USING 

H ##m###r;T(i] 

30 NEXT 1 
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En la línea 20 , la zona USING 
"#########" específica que se deben 
reservar nueve espacios {tantos como 
símbolos haya) para la representa- 
ción del siguiente dato. Si el número tie- 
ne menos cifras, se rellenan los espa- 
cios sobrantes a la izquierda con «blan- 
cos». Esta rutina daría el siguiente re- 
sultado por pantalla: 



RUN 




MANOLO 


2223344 


LUIS 


2341100 


PEDRO 


4442233 


CARLOS 


221122 


JUAN 


4005544 



3 


5 


4 




117 














PRINT USING - 


8 














O 


1 





El uso de la función USING asociada 
al comando PRINT permite 
especificar el formato en el que 
deben ser presentados ¡os datos , 



Dentro del formato no sólo se puede 
especificar el número de dígitos. Cuan- 




do se trata de datos numéricos con par- 
te fraccionaría, es útil a menudo fijar el 
número de decimales a representar. 
Con e! fin de reservar un espacio fijo 
para Jas zonas entera y fraccionaria, se 
actúa de forma muy similar a ía ante- 
rior. Por ejemplo, si lo que se desea es 
mostrar cinco dígitos, de los cuales dos 
serán los correspondientes a la parte 
decimal, se empleará la expresión si- 
guiente: 

PRINT USING tr mur- ... 

El punto decimal (notación anglosajo- 
na equivalente a la coma decimal), se 
coloca en el lugar correspondiente, en- 
tre signos Tomemos, por ejemplo, 
los siguientes números: 

12.132 ,502.3 ,45.625 y 1208,332 

Veamos qué ocurre al utilizar un for- 
mato como el anterior. El comando, eje- 
cutado en forma directa, será el siguien- 
te: 



PRINT USING "###.##"; 

1 2,1 32,502.3,45.025,1208.332 <CR> 
12,13 502.30 

45.63 %1 208.33 



Este ejemplo ilustra con claridad e 
funcionamiento del PRINT USING. Er 
primera instancia, se reservan tantos 
espacios como signos "#" haya. Así, e- 
el primer número (12.132), se deja un 
espacio antes del primer dígito. Ello se 
debe a que se han especificado 3 posi- 
ciones a la izquierda del punto decima 

En cuanto a la parte fraccionaria, sólc 
se han impuesto dos dígitos; por lo tan- 
to, sólo se representan Jas dos primeras 
cifras, truncándose las restantes. En la 
representación del tercer numere 
(45,625) se ve que se redondean los de- 
cimales cuando hay truncamiento por la 
derecha. 

Si el número a representar excede a 
la cantidad de posiciones especificadas, 
pueden ocurrir dos cosas. Pueden falta- 
posiciones a la derecha del punto deci- 
mal; en tal caso no se representan los 
dígitos sobrantes, redondeándose el úl- 
timo decimal. Si, por el contrario, los dí- 
gitos sobrantes se encuentran a la iz- 
quierda del punto, estos no se truncan 
Si se truncara el número por la izquier- 
da el error cometido sería muy grande 
cosa que no sucede al redondear ios de- 
cimales. Para avisar de la existencia de 
«desbordamiento», el BASIC imprime un 
signo de tanto por ciento en la primera 
posición de la presentación. Un ejemplo 
de ello lo constituye el último número 
visua fizado en el ejempfo anterior. 



Formatos con signo 



En el tipo de formato numérico ante- 
riormente comentado, no se ha tenido 
en cuenta el signo (+ o -) del dato. Cuan- 
do el número es negativo, el signo (-) se 
representa consumiendo una de las po- 
siciones reservadas. Véase el siguiente 
ejemplo: 



10 PRINT USING 
20 PRINT USING “m 
30 PRINT USING W 



45 

-45 

145 



40 PRINT USING W —145 



Los signos de valor numérico (tí) 
definen el número de espacios que 
hay que resen/ar para la presentación 
de ¡os datos. 



La ejecución de estas cuatro líneas 
muestra cómo el signo ocupa una de tas 
posiciones que se reservan en el forma- 
to. Este sería el resultado: 
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RUN<OR> 
45 
-45 
145 
% — 1 45 
I 



Así pues, cuando se prevean números 
negativos, es aconsejable dejar una po- 
sición adicional para la representación 
del signo. El signo positivo, en cambio, 
no se representa. Si se desean visuali- 
zar los números con su respectivo signo 
(tanto positivo como negativo) habrá que 
especificar tal circunstancia en el for- 
mato. Ello se consigue incluyendo un 
carácter «+» en ei mismo. En el caso del 
ejemplo precedente, esta exigencia se 
resolvería de la siguiente forma: 

10 PRINT US IM G "+### rí ;45 
20 PRINT USING ' W';-45 
30 PRINT USING 'W';145 
40 PRINT USING "+###>1 45 

Ahora todos los datos se representa- 
rán con su correspondiente signo. 

El signo (positivo o negativo) puede 
ser situado tanto a la izquierda como a 
la derecha del dato. Para ello basta con 
colocarlo, dentro del formato, en la po- 
sición adecuada. A continuación, se 
muestra el mismo ejemplo pero con e! 
signo a la derecha. 

10 PRINT USING ' J ##ff+';45 
20 PRINT USING 'W;-45 
30 PRINT USING 'W+ Hr ;145 
40 PRINT USING J W+";-145 

Con este nuevo formato se obtendrá 
por pantalla el siguiente resultado: 



RUN<CR> 

45 + 

45- 

145+ 

145-, 



¡A LINEENSE!) 

V / 

I I 

II 

PRINT USING ''aaa.ntr 




t 



El uso de PRINT USING facilite la representación de listas 
de números . Todos ellos aparecerán con ei punto decimal 
situado en la misma columna de la pantalla. 



Otros símbolos en el formato 
numérico 



Además de la representación del sig- 
no, existen otras marcas útiles a la hora 
de visualizar datos numéricos. Una de 
éstas es la coma, que en la notación an- 
glosajona sirve para agrupar dígitos. 

Como ya es sabido, en nuestro país (y 
en Europa en general) se acostumbra a 
separar la parte fraccionaria de la ente- 
ra con una coma (2,5 en lugar de 2.5). 
De la misma forma, se suelen separar 
las unidades de millar de las centenas 
con un punto (1 .000 representa lo mimo 
que 1000: mil). La notación anglosajo- 
na, por el contrario, emplea el punto 
para separar los decimales y la coma 
para agrupar los dígitos. El lenguaje BA- 
SIC, por su origen anglosajón, adopta la 
segunda alternativa. £n la cadena de 
formato que sigue al PRINT USING, se 
puede indicar la agrupación de dígitos 
con comas (notación anglosajona, como 
ya se ha indicado). Para ello, el carácter 
a incluir en dicho formato es una coma, 
situada en cualquier posición a la iz- 
quierda del punto decimal. Véase el si- 
guiente ejemplo: 

10 PRINT USING Hí #M.r;2222 
20 PRINT USING 2222 



En la primera línea no se na _ a: 
el carácter indicador de agrupa — a -- : 
mientras que la línea 20 sí ti e.a 
interior dicho carácter (la pos c :r oe 
éste podría haber sido cualq^ er zrr= a 
fa izquierda del punto decima E as- 
tado de su ejecución revela e a-’t-r: 
producido por la presencia de 
«coma». 



RUN<CR> 

2222.0 

2 , 222.0 



Hay otros dos caracteres que : 
cen un efecto específico en la rec tra- 
tación de números. El primero t i 
no de dólar ($). Dos de estos sigrcs 
locados a la izquierda det forma : 
rán que aparezca dicho carácter . a 
dato representado. Este se vis_a rt 
inmediatamente a la izquierda £+- zr~ 
mer dígito. 




La presencia del carácter «+» en el formato hará que se imprima el signo del dato; 
éste puede situarse tanto al principio como al final del mismo. 



Para representar números de magn - 
tud extrema, muy grandes o muy peque- 
ños, se suele echar mano de la repre- 
sentación exponencial. En el formato 
del PRINT USING se puede especifica' 
dicha modalidad sin más que coloca' 
cuatro signos de exponenciación ¡ ) 

a la derecha de los de reserva de díg - 
los. Estos cuatro caracteres sirven para 
dejar otras tantas posiciones; una par= 
el carácter «E», una para el signo y dos 
para los dígitos del exponente. 

PRINT USING ‘";1237<CR> 

12E+03 



PRINT USING "$$###"; 2 89<CR> 
S289 

PRINT USING “S$##r;7<CR> 

$7 



Se puede mezclar la acción de estos 
dos caracteres, logrando el efecto que 
se muestra en los siguientes ejemplos. 



PRINT USING "**$# # J r ;2 89<C R > 
*$289 

PRINT USING J '**$## ";7<CR> 
* M S7 

PRINT USING "**$##"; 1 237<CR> 
$1237 



El otro carácter especial es el asteris- 
co (*), Una pareja de asteriscos coloca- 
da a la izquierda, producirá el efecto de 
rellenar los espacios en blanco con di- 
cho carácter Los espacios a rellenar 
son los que sobren al aplicar el formato 
especificado. 



PRINT USING "**###";289<CR> 
**289 

PRINT USING "* # ###";7<CR> 

PRINT USING 237<CR> 

*1237 




Como se puede observar, estos dos 
caracteres, al igual que el de signo, re- 
servan también espacio para dígitos. 



I EÍ signo de tanto por ciento {%) 

aparece en pantalla dando a conocer 
que el dato excede el número de 
posiciones reservadas para su 
visualización. 



Todos los caracteres de indicación de 
formato pueden ser mezclados con en- 
tera libertad. La única salvedad está er 
los de representación de signo; en ur 
formato sólo puede estar presente uno 
de estos caracteres. 

Formateado de datos no 
numéricos 

A la hora de representar datos alfa- 
numéricos o de cadena de caracteres 
también puede especificarse un forma- 
to con PRINT USING. Se puede indicar 
el número de caracteres a representar, 
al igual que las posiciones de los dígi- 
tos en datos numéricos. Aquí no se uti- 
liza el signo de número (#), sino que se 
recurre a espacios en blanco. Dichos es- 
pacios deben ir escoltados por «barras 
invertidas» (\), signo éste que no debe 
confundirse con el de división (/). 

De la misma forma que los caracteres 
anteriores, éstos reservan dos posicio- 
nes más. Es decir, la cadena de formato 
«\\» (<barra><espacioXbarra>) indi- 
ca que se van a representar fres carac- 
teres. Estos caracteres serán los prime- 
ros (los de la izquierda) de la cadena a 
visualizar. Si la longitud de la cadena es 
menor que el espacio reservado’, se re- 
llenan los espacios sobrantes (a la de- 
recha) con blancos. Véase un ejemplo; 
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TABLA DE CONVERSION 



Ordenador 




CADENAS 


NUMEROS 


PRINT USING 


"\<blanco5>\" 


"8T 


, (coma) 


SS 


**$ 


AMSTRAD 


PRINT USING 


r '\<blancos>\" 




, (coma) 


ss 




APPLE II 
(APPLESOFT} 


— 


- 


- 


- 


- 


- 


APRICOT 

(M-BASIC) 


PRINT USING 


”\<blancos>\" 




, (coma) 


ss 


s 


ATAR] 


- 


- 


- 


— 


- 


“ 


CBM 64 


- 


- 


- 


- 


- 




DRAGON 


PRINT USING 


"%<blancos>%" 


- 


- 


s$ 


**$ 


EQUIPOS MSX 


PRINT USING 


"\<blancos>Y' 




, (coma) 


f£ 


**££ 

i 


HP-150 


PRINT USING 


rr \<blancos>Y' 




, (coma) 


s$ 


«s 


IBM PC 


PRINT USING 


"\<blancos>V J 




, (coma) 


$$ 


**$ 


ñ/IPF 


- 


- 


— ■ 


- 


— 


_ 


NCR DM-V 
(MS-BASJC) 


PRINT USING 


"\<blancos>Y J 




, (coma) 


s$ 


«s 


NEW BRAIN 


- 


— 


- 


- 


- 




ORIC 


- 


- 


- 


— 


— 


- 


SHARP MZ-7GÜ 
(MZ-8ASIC) 


PRINT USING 


"&<blancos>&" 


- 


i 


££ 


- 


SINCLAIR QL 


- 


- 


- 




- 




SPECTRAVIDEO 


PRINT USING 


fr \<blancos>Y' 


- 


, (coma) 


$$ 


**s 


ZX-SPEGTRUM 


- 


' - 


- 


— 


— 





1 Las comas deben situarse en el fugar real es decir, cada tres dígitos 



10 A$= ri Mr :B$=' TERRO” 

20 PRIMT USIMG rH \Y';A$B$ 
30 PRIMT USING " P ;A$B$ 



En la línea 20 no se ha dejado ningún 
blanco entre las dos barras inclinadas, 
luego se reservan dos espacios. La línea 



20 incluye dos espacios entre fce~es 
ello especifica la presentación de 
tro caracteres. El siguiente serie e re- 
sultado de ejecutar este pequen: : 




Los números cuya parte decimal contiene más dígitos de tos especificados 
en ei formato son truncados por la máquina . Ei último dígito visualizado 
se redondea por fa acción de este truncamiento . 



La intimidad del 
microprocesador 

En el interior de un ordenador habita una densa 
amalgama de componentes electrónicos que son los 
responsables de su correcto funcionamiento; 
componentes que conforman los circuitos que dan vida 
al ordenador. Entre ellos destaca una zona fundamental 
denominada unidad central de proceso, la CPU (Central 
Processing Unit]. Ella es la encargada de realizar las 
tareas que implican una cierta «inteligencia». Un 
ordenador consta de otras zonas, si bien, la fundamental 
es la CPU; su centro neurálgico. En los ordenadores 



personales y, en general, en cualquier microordenador, 
la CPU está condensada en un circuito integrado 
denominado microprocesador Los dos cometidos 
principales de esta unidad son eJ control del sistema 
conjunto y la realización de operaciones. Dentro del 
primer cometido se encuadran las tareas de 
organización y gestión de la memoria y los dispositivos 
periféricos. Sólo la detección y reconocimiento de la 
pulsación de una tecla implica ya un proceso complejo, 
en la que la CPU necesita realizar varias operaciones de 
transmisión de datos. 

La segunda misión fundamental se concreta en el 
cálculo de nuevos datos a partir de Jos disponibles. Algo 
semejante a realizar la función de «calculadora* dentro 
del ordenador. Sin lugar a dudas, ambas actividades 



están mutuamente relacionadas: para sumar dos datos 
por ejemplo, es necesario localizarlos en memoria, 
extraerlos de Ja misma, y hacerlos llegar al circuito 
sumador. A menudo suelen separarse los circuitos de i 
CPU dedicados a estos dos cometidos. La zona que 
resuelve las operaciones con los datos recibe el rtomfrf 
de unidad aritmético-lógica (UAL), Esta, por lo genera’ 
sólo es capaz de sumar, restar y realizar algunas 
operaciones lógicas (AND y Qflj. Las operaciones se 
efectúan sobre los datos contenidos en registros 
especiales y el resultado se guarda en un registro 
específico denominado acumulador La unidad de conto 
[UC] es la otra zona básica de la CPU. Tal como su 
nombre indica, ésta es la que se encarga de controlar , 
supervisar la actividad global del ordenador. Se ocupa 
de hacer llegar los datos a los registros 
correspondientes, de enviar el resultado del acumulada 
a la zona de memoria adecuada y, en general, de traza- 
el ritmo de trabajo de la máquina. 

La característica más importante de un ordenador radica 
en su aptitud para recibir una programación. Ello corre = 
cargo de una secuencia de órdenes -el programa- que 
definen con todo detalle las tareas que debe realizar. 

Las órdenes se codifican de forma inteligible para el 
aparato y se guardan en la memoria del mismo. 

Para ejecutar un programa, la CPU ha de realizar 
múltiples operaciones elementales. En primer lugar, hs 
de «leer» la referida lista de instrucciones. Para elfo 
empezará extrayendo de la memoria el primer dato 
coincidente con la primera instrucción codificada. La 
CPU dispone de capacidad suficiente para interpretaría. 
Tal actividad se apoya en el denominado decodificador 
de instrucciones, que forma parte de la unidad de 
control, Una vez «asimilada» la orden, hay que planificar 
la secuencia de acciones elementales que darán pie a 
su ejecución. 

Así, por ejemplo, cursar la orden BASIC LET A-B+C, 
exige a la unidad de control acometer los siguientes 
pasos: 




Se puede apreciar que con este méto- 
do, el número mínimo de caracteres a 
exhibir es de dos (uno por barra). Para 
representar un solo carácter se ha de 
variar el formato. En este caso se pone 
simplemente un signo de admiración {!), 
éste indica que se mostrará tan sólo la 
Inicial del dato. 



Ai formatear datos alfanuméricos por 
medio de PRINT USiNG se puede 
indicar el número de caracteres que 
hay que visualizar, 



HOLA 

CABALLO 

MANUEL 

SOFT 

LIBROS 
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1 . Localizar la zona de memoria donde se encuentran 
los datos A y B. 

2. Transmitir dichos valores, tras leerlos en la memoria, 
a los registros de la unidad aritmético- lógica (UAL). 

3. Ordena a la UAL que opere la suma de ambos datos, 

4. Recoger el resultado del acumulador, y llevarlo a la 
zona de memoria reservada a la variable A. 

El orden de las sucesivas tareas elementales es estricto; 
no se puede realizar la suma sin antes disponer de los 



indica en todo momento cuál es la dirección de memoria 
en la que está almacenada la próxima instrucción a 
ejecutar 

En síntesis, la unidad de control consta de Jos 
siguientes elementos básicos: 

Registro de instrucciones, en el que se guarda la 
instrucción en curso. La CPU la traslada de la memoria 
a este registro para tenerla más a mano». Aquí es 
donde puede proceder a su identificación. 



Decodificador de instrucciones. Se trata de un circuito 
capaz de «reconocen» la instrucción en curso. Este 
inspecciona el contenido del registro de instrucciones - 
determina de qué orden se trata. 

Secuenciador. Este circuito es el encargado de da- i.-k 
a la acción identificada por el decodificador. Una 
que éste ha interpretado la instrucción recibida, 
en actividad el secuenciador, quien se responsab ' zs oe 
ejecutarla. Para ello genera las microórdenes aoec_=c ü= 
(trapaso de datos, operación de la UAL..). 




Dentro del microprocesador cabe 
diferenciar dos zonas básicas: la 
unidad de control y el bloque de 
proceso. Este último está constituido 
por la unidad aritmético-lógica y una 
serie de registros de trabajo. 



sumandos. Para ello, la CPU dispone de una especie de 
reloj interno que le permite encadenar los diversos 
oasos o micrcórdenes. 

i_a unidad de control ha de supervisar todo el proceso y 
conocer en cada instante qué tareas se han realizado y 
cuáles quedan por cursar. Asimismo, debe saber cuál es 
¡a siguiente instrucción a leer y ejecutar. 

Otro de los elementos primordiales de la CPU es el 
contador de programas. Se trata de un registro que 



REGISTRO 

DE 

INSTRUCCIONES 






DECGDIFICADGR 

DE 

INSTRUCCIONES 




I Los elementos básicos de la unidad de control son el registro de instrucciones 
(almacena la orden en curso l el decodificador de Instrucciones (interpreta , 
decodifica el significado de la orden) y el secuenciador (encargado de ac: a? 

acciones necesarias para su ejecución). 



20 PRINT USING r T J ;A$B$ 
RUN<CR> 

MP 

MI PERRO 



la USING en el argumento de PRINT. 

A diferencia de lo que ocurre con los 
datos numéricos, aquí no está permitido 
unir varios indicadores de formato. La 
razón es muy simple: especifican accio- 
nes incompatibles. 



Uso avanzado de PRINT USING 

El formato con el que se va a presen- 
tar el dato se especifica por medie de 
una cadena de caracteres especiales. 



Por último, se dispone de un indica- 
dor adicional para visualizar el dato en 
toda su longitud. Se trata del signo 
_a utilización de este signo equivale 
a suprimir la incidencia de la partícu- 



PRINT USING I 

Presenta en pantalla los datos usando el formato especificado como una cadena de caracteres 

Formato: PRINT USING <formato>; <dato 1>;[<dato2>...] 

Ejemplos: 20 PRINT USING "##*.#'; 127.45 
70 PRINT USING T;A$8$ 
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El uso def signo *!» hará que sólo se 
visualice el primer carácter de la 
cadena especificada. 



HOLA 




H 


CABALLO : 




C 


MANUEL 


PRINT «i», 'v 


M 


SOFT 


USING ’ V 


S 


LIBROS 




L 



Esta cadena no tiene, necesariamente, 
por qué ser un dato fijo. Puede utilizar- RUN<CR> 
se una variable para determinar el for- *10.00 

mato. El siguiente es un ejemplo de for- | 

mato variable 

10 LETAfc"**«r 
20 PRINT USING A|10 

En él se hace uso de la variable de ca- 
dena A$ para almacenar el formato de 
presentación. Este es el resultado de 
ejecutar las dos líneas precedentes: 



TABLA DE OPCIONES DEL COMANDO PRINT USING 


Cadenas 


I 


Se muestra únicamente la inicial del dato de cadena. 


\<blancos>\ 


Se representan tantos caracteres como blancos haya más dos. Si la cadena^ 
no tiene ese número de caracteres se justifica a la izquierda. 


& 


Se representa la cadena tal como es. 


Números 


n 


Se utiliza para especificar el número de dígitos a reservar. 




Indica el lugar en el que se ha de situar el punto decimal 


+ 


Se presenta el signo del número, a Ja izquierda o a la derecha de éste. 


- 


Colocado a derecha exhibe el signo de los datos negativos. 




Rellena los espacios en blanco, por la izquierda, con asteriscos. 


$$ 


Muestra un signo «$> a la izquierda del primer dígito. 


**$ 


Muestra un signo «§> a la izquierda del primer dígito, rellenando los espacios 
de más a la izquierda con asteriscos. 


* 


Sitúa comas cada tres dígitos a la izquierda del punto decimal, 


— 


Fuerza la representación exponencial del dato. 



Utilizando variables para el almace- 
namiento de formatos, es posible que 
sea el propio programa quien elija el for- 
mato, de entre los almacenados en va- 
riables. También pueden generar distin- 
tos formatos empleando las funciones 
para el tratamiento de cadenas. 

En el formato pueden incluirse carac- 
teres distintos de los comentados. Estos 
no producirán más efecto que el de apa- 
recer en pantalla. Un posible formato, 
conteniendo caracteres no estándar, es 
el que muestra la siguiente pantalla: 



10 PRINT USING HJ I\IUMERG**###";99 
RUN<CR> 

NUMER(T*99 



También es posible especificar forma- 
tos para más de un dato, aunque sean 
de distinto tipo. En el siguiente ejemplo 
se crea un formato para un dato de ca- 
dena y otro de tipo numérico. 



10 PRINT USING " \ VW'NUMER0";99; 

”TE";121212 

RUM<CR> 

NUME***99TE %1 2121 2 



En este último caso, es obligado situar 
los datos en el orden correcto; de otro 
modo, se produciría un error. 
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Tratamiento 
de errores 



Detección y supresión 
de errores en los 
programas BASIC 



■ arde o temprano, 
todo programador 
o usuario tropieza 
con un programa 
que no funciona 
debidamente. ¿Qué Je ocurre al progra- 
ma? En principio, cabe pensar que debe 
tratarse de un error cometido durante la 
introducción del mismo. Así pues, hay 
que localizar y subsanar ese error. Esta 
tarea no siempre resulta fácil. Habitual- 
mente, es necesario disponer de un lis- 
tado por impresora, y repasarlo a con* 
ciencia. La dificultad se ve incrementa- 
da cuando el programa ha sido escrito 
por otra persona. En tal caso, es preciso 
comprender previamente el funciona- 
miento del mismo. A lo largo de este ca- 
pítulo se comentan algunos métodos 
encaminados a la detección y elimina- 
ción de errores, así como la forma de 
producir y utilizar errores a título volun- 
tario. 



Depuración de programas 

En determinadas circunstancias el 
mal funcionamiento de un programa se 
debe a errores de codificación. Puede 
darse el caso de que la ejecución no 
pase nunca por una rutina determinada. 




Al igual que cualquier otra tarea 
realizada por el hombre . 
la confección de programas 
para ordenador 
es también una actividad 
propensa a acoger errores. 

En tal caso . el ordenador 
manifestaré un funcionamiento 
distinto al esperado. 




Es necesario revisar ¡os 
programas para evitar 
errores de codificación. 
Por ejemplo, un salto a 
una línea que no existe. 



En ei otro extremo puece oc_— - : _z - : 
se salga nunca de ur bucie En a— oís 
casos, el problema se zere - ezzz-es e*' 
la desviación del flujo :e e z- 

En la etapa de creaciór ce i'ii'z- 
ma es conveniente sec_ ' _"a — _- 

ra definida. Delimitar los bbqussifeaÉ- 
rutinas y no mezc ar ¿5 
del programa, z ;: - : _ -= - : 1 - 

claridad al listsz: = ^ ¿t 

cesiva proiiferso or ds z--s De- 

tipo GOTO. Ur sz_sz re es -—-li- 
ciones hace que se . _e .a 

difícilmente ~:e 1 1 e z-a-e cua c.er 
persona, incluid: e crici-o au:r 

La forma más elemental de cor-jpn>- 
bar si un prog'Z*^: "es ze 

el «seguimiento* os Sw ejecución «pase 
a paso» o rszn¿::: i” a ínsirucc 
Este es el mefor procedimiento c uando 
se trata de cc — z zar el corree: z 
cionarmento oe _na rutina o ds ur zrz- 
grama corto. 

La referida téc-¿ca consiste er azu^r 
como lo ha na e : 'cenador; esto es r 
leyendo as sucesivas intruccio^ess * 
ejecutarlas soire e papel, una a 
Para ello es co^ ,e~ ente realizar :s- 
bla de variares en la que se ir ár 'abi- 
jando los sucesivos valores que asoc- 
ian. Cabe -si =' ze este método 1 
como de s Trulación «a mano* 

Realmente se trata de una téc- :s 
muy adec_izsa y no sólo para coir i'i- 
bar el ‘-rdonamiento de la ruz - 
na, sino para cómprenos^ Ss_ 

modo de trabajo El gran problema no 
obstante, es que sólo es aplicable ™ 
plena eficacia cuando la rutina a estu- 
diar es zaq-eña. 

A título ce ejemplo, veamos a cori- 
nuacícr ::mo se realizaría el sec, - 
mien:: oe una rutina corta, tal comí a 
que sigue 



10 H*H=1T0 3 
10 FQR J=1 T0 3 
X J-i JHd 
40 \EXTJ 
5C HEXTI 
1 




Para subsanar de forma rápida y automática los previsibles 
errores que puedan producirse , es conveniente proceder 
a su tratamiento por medio de rutinas al efecto. 



Para evaluarla aplicando la técnica 
descrita, se construye una tabla con las 
variables utilizadas. En este caso F se tie- 
nen las dos variables de los bucles y las 
nueve de la matriz. Se supone que la 
matriz está inidalizada con ceros, 

A medida que se va pasando por la lí- 
nea 30. se van asignando valores a los 
elementos de A. En definitiva, la referi- 
da tabla de seguimiento de variables 
adoptará el aspecto que se indica en el 
cuadro adjunto. 

En cada ejecución del bucle interno se 
asigna un valor a uno de los elementos 
de la matriz. Los restantes elementos no 
se alteran y siguen conservando los va- 
lores que tenían en la pasada anterior. 

Otro procedimiento de uso también 
generalizado, consiste en introducir se- 
ñalizadores en el programa que permi- 
tan saber por dónde está avanzando la 
ejecución del programa; ello permitirá 
saber si determinada rutina se ejecuta 
o no. Como señalizadores pueden em- 



plearse varias de las posibilidades del 
aparato. Desde señales sonoras hasta 
mensajes que se han de visualizar en 
pantalla. Entre estos últimos cabe des- 
tacar como especialmente interesantes 
los consistentes en visualizar en panta- 
lla los valores de determinadas varia- 
bles. 

Acto seguido se muestra un ejemplo 
de aplicación de esta técnica. Se trata 
de un programa que calcula los núme- 
ros primos hasta un cierto valor N defi- 
nido por el usuario. 

10 INPUTN 
20 FOR 1=1 10 N 
30 G0SUB 1000 
40 NEXT S 
50 END 

1000 PRINTP" 

1010 FOR J=2 T0 1/2 

1020 IF INTfl/JH/J THEN GOTO 1050 

1030 NEXT J 




Pone en marcha el mecanismo de trazado de !a ejecución. 

Formato: (número de línea] IR 0N 

Ejemplos; 10 TRON 
TRON 



1040 PRINTI 
1050 RETURN 

La instrucción PRIISIT "P" de la línea 
1000 se ha introducido con el único ob- 
jeto de comprobar si se han realizado 
tantas llamadas a la rutina como se es- 
peraba a priori. Por cada P que aparezca 
en la pantalla sabremos que se ha efec- 
tuado una llamada a la subrutina. De 
este modo, se puede controlar sí el flu- 
jo de ejecución del programa es el ade- 
cuado. 

Otra forma útil de determinar el co- 
rrecto funcionamiento del programa 
consiste en detener el proceso en el mo- 
mento adecuado y examinar los valores 
de las variables en ese preciso instante. 
Téngase en cuenta que, por lo general, 
será posible continuar la ejecución del 
programa mediante el empleo del co- 
mando CONT. 

También puede resultar de utilidad 
realizar ejecuciones parciales del pro- 
grama dando unos valores determina- 
dos a ciertas variables. Al respecto, es 
conveniente recordar que una orden 
GOTO dirigida a un número de línea no 
borrará los valores previos de las varia- 
bles, al contrario de lo que sucede al 
ejecutar un comando RUN. 



Los comandos TRON/TROFF 

Por último, dentro de la depuración de 
programas es interesante saber que mu- 
chos aparatos incorporan dos instruc- 
ciones muy útiles. Se trata de los co- 
mandos TRACE ON y TRACE OFF. El uso 
de estos comandos permite conocer en 
todo momento las líneas de programa 
que se están ejecutando. Su modo de 
funcionamiento es el siguiente: TRACE 
ON o TRON {dependiendo del equipo) 
activa un mecanismo por el que se vi- 
sualizan en la pantalla los números co- 
rrespondientes a las líneas que se van 
ejecutando. Por su parte, TRACE OFF o 
TROFF desactiva dicho mecanismo. 

Las herramientas TRON/TROFF re- 
sultan muy útiles, especialmente en 
programas relativamente complicados 
en los que realizar el seguimiento «ma- 
nual» resulta una ardua tarea. Da bue- 
nos resultados cuando el programa no 
funciona por quedarse estancado en un 
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El uso abusivo de ¡a instrucción GOTO puede convertir 
úl seguimiento del programa en una auténtica odisea. 



bucle sin salida. En tal caso r únicamen- 
te es necesario dejar que el programa 
se ejecute e ir tomando nota de los nú- 
meros de línea que aparecen. Hay que 
observar si éstos se repiten tras un de- 
terminado ciclo. Si ese ciclo es tal que 
impide la ejecución satisfactoria del pro- 
grama, será ahí (en esos números de lí- 
nea) donde se halla el error. 



Tratamiento de errores 

En condiciones normales, cuando se 
produce un error, la máquina informa de 
ello mediante el correspondiente men- 
saje de error y, por supuesto, detenien- 
do la ejecución del programa. 

Esta forma de actuar suele ser la más 
conveniente en la mayor parte de las 
ocasiones. Sin embargo, ello no es 
siempre así. De hecho, este modo de 
proceder es molesto y desaconsejable 
en muchas ocasiones. Por ejemplo, se 
producirá un error al introducir un ca- 
rácter alfabético tras la ejecución de un 
comando INPUT correspondiente a una 
variable numérica. Este error producirá 
la detención del programa, siendo nece- 
sario reiniciarío si se desea continuar. 

Existe una primera solución al proble- 
ma. Esta consiste en realizar la intro- 
ducción del dato como variable de cade- 
na para, más tarde, operar la necesaria 
conversión. Existe otra solución, que es 
precisamente la que se pretende estu- 
diar en este capítulo; solución que tiene 
como base el tratamiento del error por 
parte del programa. Para llevarlo a cabo 
es necesario indicar al ordenador que, 
en caso de producirse dicho error, se 
ejecute una determ tanda rutina. Rutina 
ésta que ha de aportar las instrucciones 
necesarias para el correcto tratamiento 
del error detectado. Esa rutina puede 
muy bien ser codificada en BASIC por el 
propio usuario. El comando necesario 
para indicar esta situación al ordenador 
es ON ERROR GOTO, cuyo formato es 
el que se muestra a continuación: 

(Número de línea) ON ERROR GOTO 
<numero de línea> 

Donde <número de iínea> correspon- 
de al número de línea donde empieza la 
rutina que se ha de ejecutar en el caso 
de que se produzca el error en cuestión. 



A partir de este momento es necesa- 
rio conocer algunos detalles que inter- 
vienen en la rutina de tratamiento de 
error. Para empezar, existen dos varia- 
bles: ERR y ERL que contienen informa- 
ción acerca del error que se ha produ- 
cido. La primera de ellas es ERR (ERror 
Report) y contiene el código que identi- 
fica el error que ha tenido lugar. Por su 
parte ERL (ERror Line) contiene un nú- 
mero que corresponde al número de lí- 
nea en el que se ha detectado dicho 
error. Con esta información ya es posi- 
ble conocer unos parámetros bastante 




interesantes y que pueden ser emplea- 
dos en la rutina. 

Los códigos de error vienen asignados 
por el propio ordenador con el que se 
trabaje; aunque bien es cierto que tam- 
bién existen otros códigos no asignados 
que pueden ser empleados para definir 
errores de otra índole. 

En cuanto al repetorio de errores que 
aporta el aparato y a sus códigos corres- 
pondientes, lo más efectivo es consul- 
tar el manual del propio equipo, ya que 
la equivalencia de esos códigos es es- 
pecífica de cada ordenador. 



Desactiva la ejecución paso a paso o trazado del programa. 

Formato: (número de lineal TRO FF 

Ejemplos: TROFF 

70 TROFF 
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GOTO 100 



VARIABLES 

A 
B 



□D 

□O 




90 INPUTA 
100 PRINT 7 
110 POR 1=1 



Después de interrumpir ¡a ejecución de un programa , ésta puede remictarse por medio de la orden RUN 
o la GOTO. La diferencia entre ambas radica en el hecho de que RUN borrará todas i as variables de! 
programa , mientras que GOTO mantendrá los valores de las mismas. 



Las rutinas de tratamiento de error 
han de incluir, al final, una instrucción 
que continúe la ejecución del programa. 
Estas rutinas actúan de forma muy pa- 
recida a las subrutinas invocadas con el 
comando GOSUB. Al igual que aque- 
llas, necesitan de una instrucción que, 
como RETURN, devuelva el control a la 
zona principal del programa. Esta ins- 
trucción es RESUME y su formato es e! 
siguiente: 

(Número de línea) RESUME <opción> 
En el que la zona de <opción> hace 



referencia a una de las posibles alter- 
nativas que a continuación se comen- 
tan, 

• RESUME sin argumento o RESUME 

0 

Una vez procesada la rutina de trata- 
miento, si el ordenador se encuentra 
con esta instrucción continuará la eje- 
cución del programa principa! en la mis- 
ma línea en la que se produjo el error. 

• RESUME NEXT 

Esta opción hace que, tras el trata- 
miento del error, la ejecución del pro- 



0N ERROR GOTO 



Hace que, al producirse un error, se ejecute ia rutina situada a partir de la línea que se indica. 

Formo: 0N ERROR GOTO Cnúmero de línea> 

Ejemplos: 10 0N ERROR GOTO 100 
50 0N ERROR GOTO 2500 



grama continúe en la línea siguiente a 
aquella en la que se produjo dicho error. 

• RESUME Cnúmero de línea> 

Cuando se incluye este argumento, el 
programa continua ejecutándose en la 
línea correspondiente al número que se 
especifica. 

De esta forma, después de tratar el 
error se puede volver al programa prin- 
cipal, prosiguiendo su ejecución desde 
el punto deseado. 

Cuando se emplea una de estas ins- 
trucciones sin que previamente se haya 
producido un error, se producirá a su vez 
otro error: RESUME ERROR. Por lo tan- 
to, es preciso separar la línea que con- 
tenga este comando del resto del pro- 
grama. Ese error es similar al que se 
produce al intentar ejecutar un coman- 
do RETURN sin haber efectuado previa- 
mente una llamada a subrutina (GO- 
SUB). 

Y no sólo se pueden tratar los errores 
contemplados por el aparato. También 
el propio usuario puede crear errores 
que atiendan situaciones no previstas 
por el fabricante. Esto último se consi- 
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gue utilizando los códigos de error que 
no estén asignados previamente o Ta- 
lando de forma distinta los errores me- 
nos habituales. 



Errores «a voluntad» del usuario 



Para producir un error se puede em- 
plear el comando ERROR, cuyo formato 
es el que se indica. 

(Número de línea) ERROR <código de 
error> 

Donde <código de error> es un dato 
numérico correspondiente al código que 
identifica al error deseado. 

Con este comando se puede generar 
cualquiera de los errores contemplados 
en el aparato, así como otros que el 
usuario desee emplear. Estos últimos 
han de ser los correspondientes a los 
códigos que se encuentran sin asignar. 

A continuación, se incluye un ejem- 
plo relativo al uso de las instrucciones 
para el tratamiento de errores. En este 
caso se aplica al conocido juego de adi- 
vinar un número. 

10 REM ADIVINA UN NUMERO 
20 ON ERROR GOTO 80 
30 LET A=l+INTOOO*RNDj 
40 INPUT "NUMERO"^ 

50 1F A>B THEN ERROR 80 ELSE IFA<B THEN ERROR 81 
60 PRINT "ACERTASTE'' 

70 END 

80 IF ERR=81 THEN PRINT "DEMASIADO ALTO 1 ' ELSE 
PRINT "DEMASIADO BAJO" 

90 RESUME 40 
100 END 

En la línea 20 se comunica al ordena- 
dor que, en el caso de producirse un 
error, debe desviar la ejecución a una 
rutina de tratamiento situada a partir de 
la línea 80. A continuación, en la línea 
30 se genera el número que el usuario 
debe acertar. Este número estará com- 
prendido entre uno y cien. 

En la línea 40 el aparato pide al ope- 
rador que introduzca el número que 
constituye su intento; mientras que en 
la línea 50 se comprueba si el número 
introducido coincide con el que calculó 
la máquina. En ese preciso momento se 
puede generar un error, que será el 80 




Produce el error identificado por el número de código indicado en su argumento. 

Formato: (número de línea) ERROR <código de error> 

Ejemplos: 20 ERROR 80 
70 ERROR 2 




□ATO NO NUMERICO 



VARIABLE NUMERICA 



50 INPUT S 



El propio intérprete de BASIC hace uso de un sistema de tratamiento de errores 
Esto se pone de manifiesto, por ejemplo , al intentar asignar una cadena de 
caracteres a una variable numérica. 



sí el número introducido es mayor que 
el calculado por la máquina, o el 81 si 
es menor. 

Si se produce uno de ambos errores, 
el ordenador efectuará un alto en ¡a eje- 
cución al número de línea indicado en 
la instrucción ON ERROR GOTO. El co- 
mando situado en la línea 60 es el que 
se ejecutará cuando se acierte el núme- 
ro; su misión es presentar en la panta- 
lla un mensaje de felicitación. Por últi- 
mo, la instrucción de la línea 70 es la 
que finaliza la rutina principal. 

Entre las líneas 80 y 100 está situada 
la rutina de tratamiento de errores. En 
ella se encuentra la línea 80, que ge- 
nera un mensaje si el error que se esiá 
tratando es el 80, y otro si corresponde 



al 81 . Por último, la línea 90 es la que 
pone fin a la rutina y produce el retejo 
a la zona principal. El retorno se e'e:- 
túa, concretamente, a la línea ~0 
Si el ordenador utilizado no estríe 
de la partícula ELSE dentro del 
do IF, se puede sustituir la línea 50 ce- 
las dos siguientes: 

5C SF A>B THEN ERROR 80 
55 IF A<B THEN ERROR 81 

De la misma forma, la línea 80 se - era 
sustituida por las que se indican c izo- 
tinuación: 

8C IF ERR=8t THEN PRINT "DEMASIADO ATO 
55 FERREO THEN PRINT "DEMASIADO = 
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El tratamiento de errores en la 
práctica 



Reanuda la ejecución de la zona principal del programa en el punto indicado en su argumento. 

Formato: [número de línea) RESUME <opción> 

Ejemplos: 20 RESUME 

70 RESUME 50 








I Las instrucciones TRON y TROFF activan y desactivan el trazado del programa o . lo 
que e$ lo mismo, su ejecución paso a paso . Esta posibilidad resulta muy útil para 
seguir el flujo de ejecución a través de las diversas zonas del programa i Ello 
permitirá detectar fácilmente la existencia de bucles infinitos. 
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4 
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4 
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6 



Tabla de evolución de variables asociada af seguimiento de la rutina BASIC incluida en el texto 



Como ya se ha indicado, los errores 
de usuario pueden ser empleados para 
producir y tratar errores no contempla- 
dos en eí repertorio propio del aparato. 
Por ejemplo, si como se comentaba 
más arriba se desea que no se detenga 
la ejecución del programa cuando se 
produzca un error, se puede emplear la 
técnica que revela el siguiente ejemplo: 

90 0N ERROR GOTO 100 
100 INPUTA 
110 PRINT 100/A 

En este caso, al producirse un error 
se saltará a la línea 100. El error puede 
originarse al intentar asignar el valor 
cero a la variable numérica A. Al tener 
lugar ese error se salta a la línea 100 
volviéndose a recoger un nuevo valor 
del teclado. Con ello se consigue la rei- 




La instrucción ritüUMt indica al 
ordenador en qué punto del 
programa principal ha de continuar la 
ejecución tras procesar la rutina para 
el tratamiento del error 
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TABLA DE CONVERSION 




TRAZADO 


TRATAMIENTO DE ERRORES 


Ordenador 


TRON/TROFF 


ON ERROR GOTOn 


RESUME 


ERROR n 


ERR y ERL 


AMSTRAD 


TRÜN/TRGFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERRyERL 


APPLE II 
(APPLESOFT) 


TRACE/NO TRACE 


ON ERR GOTO 


RESUME 


- 


- 


APRICOT 

(M-BAS1C) 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y ER. 


ATARI 


- 


TRAP 


- 


- 


— 


CBM 64 




- 




- 


— 


DRAGON 


TRON/TROFF 


- 


- 


- 


- 


EQUIPOS MSX 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y EF_ 


HP-15Q 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y E 3 - 


IBM PC 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y ER_ 


MPF 


TRACE/NO TRACE 


ONERR GOTO 


RESUME 


- 


— 


NCR DM-V 
(MS-BAS1C) 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y H£L 


1 NEW8RAIN 


- 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERRNO 


ORIC 


TRON/TROFF 


- 


- 


- 


— 


SHARP MZ.700 
’ (MZ-BASIC) 


- 


ON ERROR GOTO n 


RESUME 


- 


ERR . BC 


SINCLAIR QL 


- 


- 


- 


- 


- 


SPECTRAVIDEO 


TRON/TROFF 


ON ERROR GOTO n 


RESUME 


ERROR n 


ERR y ERL 


ZX-SPECTRUM 


- 


- 


- 


- 





terada ejecución del comando IMPUT. El 
programa sólo continuará si el dato in- 
troducido no conduce a error. 

Realmente, en el ejemplo propuesto 
no existe un tratamiento del error pro- 
piamente dicho. Para efectuar dicho tra- 
tamiento habría que utilizar una rutina 
que podría ser semejante a la incluida 
en las líneas 1000 y 1010 del siguiente 
ejemplo: 

90 0 N ERROR GOTO 1000 
100 INPUTA 
110 PRIMT 100/A 



900 m 

1000 PRIMT 'DATO NO VALIDO, INTENTELO DE MUEVO" 
1010 RESUME 100 

Como se observa, el tratamiento del 
error consiste en mostrar un mensaje y 
repetir la introducción de! dato. Hay que 
poner cuidado en la elección del punto 
de retorno. Si la línea 1010 incluyera un 
comando RESUME sin argumento, se 
reanudaría la ejecución en la línea 1 10. 
Élio provocaría un retorno a la línea que 
da origen al error, sin subsanar el mis- 
mo. 

En el caso de que se pueda conocer a 
prior i el tipo de error originabie, éste 



puede ser corregido en la rut ne i-e ira- 
miento En el ejemplo se s abe e 

error se producirá cuando A va re :src 
por lo tanto, la rutina de error pitede _t ■ 
¡izarse para cambiar el va^o~ de “ cna 
variable. Esto es precisamente : 
hace en el siguiente ejempíc 

90 0N ERROR GOTO 1000 
100 INPUTA 
110 PRINT 100/A 



900 END 
1000 LET A=1 
1010 RESUME 
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Ahora, de producirse el error, será el 
mismo programa quien lo solucione, 
asignando un valor no nulo (en este 
caso 1) a la variable A, 

Si se prevén distintos tipos de errores, 
se pueden separar sus rutinas de trata- 
miento de varias formas. 

Si los diferentes errores surgen en zo- 
nas separadas del programa, lo más 
adecuado es intercalar comandos OIM 
ERROR GOTO con distintos argumen- 
tos. Así, al principio de una determina- 



Códigos detectores de error 

Paridad par y paridad impar 

En la transmisión de información de un emisor a un 
receptor pueden producirse errores. Esto ocurre en todo 
tipo de comunicaciones. En una conversación entre dos 
personas es posible que el ruido ambiente haga difícil el 
entendimiento entre éstas. Al comunicarse utilizando 
otro medio de transmisión también se dan interferencias 
que alteran la información transmitida. El ejemplo más 
palpable es el de las conferencias telefónicas. 

En el interior del ordenador se produce un continuo 
trasiego de información. Esta se va desplazando del 
teclado a la unidad central, de la unidad central a la 
memoria, de la unidad central a la pantalla, de la 
memoria a la unidad central, etc. En este maremagnum 
de tráfico no es extraño que se produzcan alteraciones 
en la información. 

Como es sabida la información es tratada por el 




ios errores pueden convertir en 
ininteligible 3 una transmisión. Para 
evitar esta situación se recurre al 
empleo de los bits de pandad cuya 
misión es la de permitir la detección 
de posibles errores en la información 
transferida. 



da zona de instrucciones, se colocará 
una orden del tipo ON ERROR GOTO 
que salte a la rutina que atienda el error 
propio de esa parte del programa. Ello 
supone añadir tantas rutinas de trata- 
miento como errores se prevean. 

En el caso de que el error pueda sur- 
gir en cualquier parte del programa y 
pueda ser de distinto tipo, lo anterior 
será inviable. Esto ocurrirá si en una 
misma línea se pueden producir errores 
distintos. La solución en tal caso es uti- 



lizar una rutina de tratamiento que "dis- 
tinga" el tipo de error. Dicha distinción 
se puede realizar muy fácilmente utili- 
zando la variable ERR para bifurcar la 
ejecución. 

También es posible identificar de una 
manera más detallada el error. Esto úl- 
timo se consigue con el empleo conjun- 
to de ERR y ERL, 

De esta forma se puede realizar un 
tratamiento individualizado de cada 
error que se produzca. 



ord e na dor en f orm a de impulsos el éctr icos. Dichos - 
impulsos se transmiten a través de conductores y 
cuanto mayor es la longitud del conductor, mayor 
resistencia opone éste al paso de la corriente. Esto hará 
que algunos impulsos queden anulados, produciéndose 
errores en la transmisión. 

Para paliar de algún modo esos errores de transmisión 
se hace uso de los sistemas de detección de error. Para 
ello se recurre al envío de información redundante que 
permite la confrontación de los datos. Si una 
información no coincide con la otra es que se ha 
producido un error. Los diferentes métodos detectan ef 
error producido en la transmisión de un byte. La 
información adicional se codifica en algunos bits que se 
añaden a los ocho de cada byte. 

El sistema más sencillo y más empleado es ef método 
de la paridad. En él se comprueba si el numero de unos 
transmitidos es par o impar. La paridad par consiste en 
añadir a la codificación de cada uno de los caracteres 
un bit; bit que se elige de forma que el número total de 
unos sea par. Con este convenio es posible detectar si 
se ha producido un error en uno de los bits. Veamos 
cómo. 

Suponga que se desea transmitir la siguiente 
información; 

01010101 

11100000 

11111110 

A estos bytes es preciso añadirles un noveno bit; bit que 
hara que el número de unos sea par. Los nuevos dalos 
serían los siguientes: 

01010101 0 
111000001 
111111101 

Tal es la información que se envía. En el extremo 
receptor se verifica la paridad de los datos; si el número 
de unos de alguno de los bytes es impar es que existe 
un error; a su vez, si no hay error se elimina ese noveno 
bit 




Con los datos anteriores se podría recibir la secuencia 
que se muestra a continuación. 

00010101 0 
11100000 1 
111111101 

Al contar el numero de unos del primer byte de datos se 
ve que es impar. Esto permite asegurar que se ha 
producido un error en la transmisión de dicho dato. Este 
método de detección sólo es seguro cuando se produce 
un único error por byte. Si se producen dos errores (o 
un número par de errores) éstos no serían detectados. 
Veamos lo que ocurre cuando se introduce un segundo 
error en el dato anterior. 

10010101 o 

£1 dato no coincide con el enviado por el emisor. Sin 
embargo, el número de unos es par. Esto indica al 
receptor que no existe error, cuando sabemos que ello 
no es cierto. 

Afortunadamente, en los sistemas modernos es cada 
vez más difícil que se produzca un errar de transmisión. 
Si la probabilidad de que coincidan dos en el mismo 
byte es mucho más remota. Por ello, este sistema es 
suficientemente eficaz. 

El método de paridad impar es semejante al comentado. 
La única diferencia estriba en la elección del noveno bit 
En el caso de pandad impar, e! mencionado bit ha de 
hacer que el número de unos de cada byte de datos sea 
impar. 



108 



Control de 
periféricos 



Joysticks y paddles en 
acción 



ara lograr una ma- 
yor verosimilitud y 
realismo en la eje- 
cución de progra- 
mas de acción, el 
ordenador necesita recibir informes y 
sensaciones externas que le indiquen 
qué es lo que está ocurriendo a su al- 
rededor, Estas influencias del medio ex- 
terior serán captadas por el ordenador 
en forma de señales eléctricas, a través 
de dispositivos adaptadores denomina- 
dos interfaces . En resumidas cuentas, 
los dispositivos de interface no son más 
que fieles traductores de esas señales 
eléctricas, procedentes de algún perifé- 
rico, a un formato comprensible por el 
ordenador. 

Para comprender mejor el proceso de 
captación de información del exterior, se 
puede pensar en la secuencia que se se- 
guirá para conseguir que una determi- 
nada orden llegue a ser «comprendida» 
por la máquina. En primer lugar, el 
usuario decidirá qué orden desea trans- 
ferir a Ja máquina. Acto seguido em- 
prenderá las acciones necesarias, ac- 
tuando sobre algún dispositivo periférí- 




USUARIO 



JOYSTICK 




TRADUCTOR 



* 



01001 



CODIGO 

BINARIO 



I 



FUNCION 
SÍJCK ( ) 



BASIC 




Para que una orden que parte de la mente del usuario 
! legue a ser «comprendida» por el ordenador es necesaria la intervención 
de una serie de dispositivos intermedios. 



co externo al ordenador que transforme 
sus pensamientos en señales eléctricas. 
A continuación, el periférico pasará esta 
información a un interface que se en- 
cargará de convertir las señales eléctri- 
cas en señales digitales codificadas en 
binario (unos y ceros), que son las úni- 
cas que puede comprender directamen- 
te el ordenador. Una vez que el ordena- 
dor ha recibido ese código binario, sólo 
le queda interpretarlo en la forma ade- 
cuada, para poder ejecutar la orden que 
quería transmitirle el usuario, Pero, 
¿quién se encarga de interpretar los có- 
digos binarios recibidos? Como es fácil 
suponer, será el propio ordenador ins- 



truido por el programa que se esté eje- 
cutando en ese momento; programa 
que, normalmente, estará codificado en 
BASIC. 

Así pues, es obvio que el BASIC dis- 
pondrá de diversas funciones y coman- 
dos para poder controlar los distintos 
periféricos que se pueden acoplar a un 
ordenador; ei estudio de estas funciones 
y comandos constituye, precisamente, 
el objetivo de este capítulo. 

La palanca de mando o joystick 

Entre la gran gama de periféricos de 
«acción» que se pueden acoplar a un or- 
denador, el más popular es sin duda al- 
guna la palanca de mando o joystick. 
Este consta de una base sobre la que se 
eleva una palanca móvil, similar a la pa- 
lanca de mando de los aviones de com- 
bate. Su utilidad a la hora de controlar 
la acción asociada a los programas de 
juegos es indudable... Pero, ¿cómo fun- 
ciona un joystick? 

Su cometido más frecuente es indicar 
la dirección y sentido hacia el que se 
quiere desplazar por la pantalla una 
nave espacial o cualquier otro artefacto 
similar. Mediante el movimiento de la 



Moviendo ¡a palanca de manda el usuario puede comunicar 
al ordenador con celeridad órdenes que r normalmente , afectarán 
al desplazamiento de un objeto sobre la pantalla. 



palanca en cualquiera de las cuatro di- 
recciones cardinales (norte, sur, este y 
oeste), o sus direcciones intermedias (nor- 
este y noroeste, sureste y suroeste), se 
consiguen definir ocho posibles orienta- 
ciones para el movimiento. 

Para detectar ía dirección en que ha 
sido movida la palanca, se dispone de 
cuatro interruptores situados en la base, 
uno para cada «punto cardinal». Así, al 
mover la palanca en uno de estos sen- 
tidos se cerrará el correspondiente inte- 
rruptor, generando una señal eléctrica 
que es codificada por el interface; este 
circuito adaptador proporciona así un 
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■ El joysttck o palanca de control es el periférico túdico por excelencia; su presencia 
es muy frecuente junto a ios ordenadores domésticos. 



código binario diferente para cada sen- 
tido de desplazamiento. El código bina- 
rio puede ser «leído» desde el BASIC con 
la ayuda de la función STICK ( ), que re- 
tornará un valor diferente para cada una 
de las ocho posibles direcciones. Como 
sucede con todas las funciones BASIC, 
dicho valor debe ser asignado a alguna 
variable previamente definida para que 
esté disponible para su uso posterior. 

El formato más general de una ins- 
trucción encargada de «leer» el estado 
en cada momento de la palanca de man- 
do, es el que sigue: 

<Núm. de línea> X^STJCK (<exp>) 



El formato incluye a la variable X (que 
puede ser otra cualquiera, con otro 
nombre, siempre que se trate de una va- 
riable numérica), en la que se almace- 
na el valor proporcionado por la función 
STICK; dicha variable será utilizada en 
el resto del programa. 

La expresión <exp.> tiene la misión 
de diferenciar el joysttck cuyo estado se 
quiere examinar, puesto que general- 
mente será posible conectar con simul- 
taneidad dos palancas de mando en 
sendos conectores de entrada. Bien es 
cierto que en algunos casos será posi- 
ble conectar hasta cuatro palancas de 
mando o más. En definitiva, el joysttck 



conectado a la toma 1 se leerá normal- 
mente con: X=STICK(1 ); mientras que la 
palanca conectada al acceso 2 se leerá 
con: X=STICK(2); y así sucesivamente 
La expresión utilizada puede ser cual- 
quier constante, variable o expresión 
matemática, que se evaluará al ejecutar 
la instrucción para obtener así un nú- 
mero entero, como se observa en el si- 
guiente ejemplo: 

X=STICK(Y— 2) 

En él, si el valor actual de Y es 4, se 
leerá el joysttck conectado al acceso o 
toma 2. Ello significa que se puede 
transferir el control a otra palanca con 
sólo variar el valor de Y, Generalmente, 
el rango de posibles valores del pará- 
metro asociado a la función STICK está 
acotado entre ciertos (imites, generan- 
do un mensaje de error (de llamada ile- 
gal a una función) si se intenta una lla- 
mada con un valor fuera de rango. Por 
desgracia, el parámetro <exp> que se 
debe aportar a la función STICK ( ), así 
como los valores entregados por dicha 
función, varían mucho de unos intérpre- 
tes BASIC a otros, por lo que será im- 
prescindible consultar el manual de 
cada ordenador. 

En algunos casos {en los equipos 
MSX, por ejemplo), es posible leer con 
la función STICK las teclas de movi- 
miento del cursor, simulando así una 
palanca de mando que permitiré despla- 
zar objetos por la pantalla. Como es fá- 
cil imaginar, se asignará a esta función 
particular un número de «port» o acceso 
{<exp.>) exclusivo para este cometido; 
por ejemplo: X=STICK(0}, 

¿Cómo se pueden diferenciar las di- 
versas acciones a tomar según el códi- 
go entregado por la función STICK ( ) en 
el contexto de un programa BASIC? Nor- 
malmente, esto se hace por medio de 
instrucciones de decisión del tipo 
IF/THEN/ELSE; según se cumpla o no 
una determinada condición, se podrá 
emprender consecuentemente una ac- 
ción u otra. 

Para poder dar los siguientes pasos 
habrá que conocer los códigos que ge- 
nera la función STICK, para lo que será 
imprescindible consultar el manual de 
cada dialecto BASIC o bien acudir al si- 
guiente programa de prueba: 

10 X’STICK {1} 




STRIG 



Lectura del botón de disparo del joysttck conectado al «port* especificado. 
Formato: [<var>] STRIG |<exp>] 

Ejemplo: 20 Y-STRIG (2) 




Lee del «pon» c toma de entrada que se especifique, el código que define la posición actual del joystick 
Formato: [<var>=] STICK «exp.» 

Ejemplo: 30 X=STICK (1 ] 
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-PALANCA 

nc MAMnn 



CONECTOR 
r STANDARD 



I 




BOTON 
DE DISPARO 



El * joystick » es un periférico lúdico 
que permite la transmisión directa de 
órdenes a la máquina; órdenes 
destinadas normalmente $ controlar 
el movimiento de figuras por la 
pantalla. 



VENTOSA 
DE SUJECCION 



CONTACTO DE LA PALANCA 



■ PIVOTE DE LA PALANCA 



20 PRINTX 
30 GOT0 10 

Al ejecutar este pequeño programa se 
imprimirá de forma continua en la pan- 
talla el valor leído en cada instante por 
la función STICKfl ), correspondiente al 
código de la posición en que se encuen 
tre situado el joystick conectado a la 
toma 1 . Para tener un punto de referen 
cia, se supondrá que se dispone de un 
joystick imaginario que entrega los si 
gu ¡entes códigos para cada una de las 
posibles direcciones de la palanca d<; 
mando: 

DIRECCION CODIGO 

REPOSO: 0 

NORTE: 1 

NORESTE: 2 

ESTE: 3 

SURESTE: 4 

SUR: 5 

SUROESTE: 6 

OESTE: 7 

NOROESTE: 8 

Bajo este supuesto, se pueden ya co 
dificar las diferentes acciones a tomar 



En el siguiente ejemplo cuyo listado 
(PROGRAMA 1) se reproduce junto al 
texto, se puede ver la utilización de sen- 
tencias IF/THEN junto con la función 
STICK ( }; el objetivo es, sencillamente, 



mover el carácter asterisco ' por 
toda la pantalla bajo las oreares del 
joystick. 

El funcionamiento de este programa 
debe resultar de muy fác: as rr ación a 



PADDLEA 



r5V 




os joysticks 
se conectan 
al ordenador 
a través de 
sendos 
conectores 
al efecto i La 
distribución 
de patillas 
normalmente 
encontrada 
en estos 
conectores 
es la que 
ilustra la 
figura . 




Los códigos generados por la función STICKQ varían mucho de un ordenador a 
otro. La figura muestra dos de las distribuciones más comunes: los números que 
aparecen en los extremos de las flechas corresponden a los códigos asociados a 
cada sentido de desplazamiento de ¡a palanca de mando. 





La función STRlGf) toma el valor «O» cuando 
no se está pulsando el botón de disparo. 



ON STRIG GOSUB 

Bifurca a una subrutina al producirse una interrupción provocada por un botón de disparo del joystick. 

Formato: ON STRIG GOSUB <nl.> U*<nl>] 

Ejemplos: 10 ON STRIG GOSUB 1000 

20 0N STRIG GOSUB 1000, 2000, 3000 



estas alturas del curso, por lo que tan 
solo basta con precisar que está escrito 
para un ordenador cuya visualizactón en 
pantalla es de 24 filas por 40 columnas 
en modo de texto, y con el origen de 
coordenadas para el comando PRfNT AT 
(X,Y) situado en el vértice superior iz- 
quierdo de la pantalla. Sí su ordenador 
no satisface este supuesto, será nece- 
sario adaptar el programa a las especi- 
ficaciones de cada caso concreto, lo que 
no tiene mayor dificultad. Así mismo, 
habrá que modificar en la mayoría de los 
casos los valores evaluados por las ins- 
trucciones JF/THEN de las líneas 70 a 
la 1 70. 

Joystick y botón de disparo 

Por el momento no se ha mencionado 
aún otro de los elementos que incorpo- 
ra toda palanca de mando y que es su- 
mamente útil para muy diversas funcio- 
nes: el botón de disparo. Se trata de un 
pulsador que puede estar situado en di- 
ferentes puntos del joystick — en lo alto 
de la palanca o en su parte anterior a 
modo de gatillo, o incluso en la base del 
joystick — > y al que por norma se le sue- 
le asignar el papef de «gatillo* dispara- 
dor para lanzar mortíferos misiles con- 
tra los más extraños alienígenas. En 
todo caso, y como se verá más adelan- 
te, su cometido no se limita únicamente 
al mencionado. 

En su aspecto hardware , el botón de 
disparo es totalmente análogo a los con- 
tactos de la base de la palanca de mar- 
do, pero en este caso sólo existe un cor- 
tacto, que según esté pulsado o no, per- 
mite diferenciar los estados activo e 
inactivo. Ello se refleja en una seña 
eléctrica que es tratada normalmente 
por el mismo interface del joystick , La 
función BASIC que «lee» el estado de 
botón de disparo es STRIG ( ) H cuyo for- 
mato más general es el siguiente: 

<Núm. de línea> X=STRIG (<exp >) 

Su funcionamiento, utilización y pará- 
metros son totalmente análogos a los de 
la función STICK, salvo en lo relativo a 
que la función STRIG sólo proporciona 
dos posibles valores, según esté o n: 
pulsado el botón de disparo. Estos dos 
valores suelen ser: «1 * cuando está pul- 
sado eí botón, y «O» cuando no está sien- 
do accionado, o viceversa, Al igual que 
ocurría con la función STICK, estos va- 
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MOTOR OFF apaga o desconecta 
eí motor de arrastre del casete. 



El comando MOTOR ON conecta el dispositivo de arranque 
del motor de arrastre del magnetófono a casete 



lores suelen variar bastante de unos in- 
térpretes a otros, por lo que de nuevo se 
hace necesaria una consulta al manual 
BASIC de cada equipo concreto. Desde 
luego, también puede ejecutarse un 
sencillo programa, similar al realizado 
en el caso de la función STICK, para co- 
nocer el código entregado por STRIG; 
programa que puede servir también para 
comprobar el correcto funcionamiento 
del botón de disparo; 

10 X=STRIG(1} 

20 PRINT X 
30 GOTO 10 

Siguiendo con la plena analogía de 
esta función con respecto a la comenta- 
da anteriormente, se puede ver en el si- 
guiente ejemplo como también el esta- 
do del botón de disparo se puede exa- 
minar mediante una instrucción 
IF/THEN, que permitirá emprender la 
acción deseada: 

10 CLS 

20 PRINT 'TODAVIA NO SE HA PULSADO EL BOTON 1 ' 

30 IFSTRIG(1)=0 THEM GOTO 30 
40 CLS 

50 PRINT "YA SE HA PULSADO EL BOTON" 

60 END 

La función STRIG se puede equiparar 
por tanto a un «conmutador software » 
que permite realizar una acción especí- 
fica, saltar a otra zona del programa, o 
ejecutar una subrutina determinada, 
cuando sea accionado el «conmutador». 
Pero estas acciones sólo se pueden rea- 



lizar cuando la ejecución del programa 
llegue a una línea BASIC que tome una 
decisión basada en el examen de la fun- 
ción STRIG. 

Control de interrupciones 

Si quiere disponer de un «interruptor 
software », para realizar una determina- 
da acción en el transcurso de la ejecu- 
ción de un programa, se debe acudir a 
otra instrucción BASIC cuyo formato es 
el siguiente: 

<Núm. de línea> ON STRIG GOSUB 

<núm.> [, <núm>,..] 

Esta instrucción genera una interrup- 
ción del procesador en el preciso instan- 
te en que alguno de los botones de dis- 
paro es accionado, sin esperar a llegar 
a la línea que examina el resultado de 
la función STRIG. Con esto se consigue 
una respuesta inmediata, pasando el or- 



STRIG 0N/0FF/ST0P 



denador a ejecutar directamente la sub- 
rutina indicada. Como normalmente 
existen varias tomas de entrada a las 
que se pueden conectar los joysticks, se 
pueden situar detrás de la palabra GO- 
SUB varios números de línea, separados 
por comas; se ejecutará la subrutina 
cuyo número de línea aparezca en el lu- 
gar correspondiente del número de or- 
den de la toma a la que está conectado 
el botón de disparo accionado para inte- 
rrumpir el programa. Así, en el siguien- 
te ejemplo: 

10 ON STRIG GOSUB 1 000,2000,3000 

se ejecutará la subrutina de la línea 
1000 si se acciona el botón de disparo 
conectado a la toma O; la subrutina de 
la línea 2000, si se acciona el botón de 
disparo de la toma 1, y la de la línea 
3000 si se actúa sobre el de la toma 2. 
Cuando se llega a la sentencia RETURN 
de estas subrutinas, el control retorna 



Permite, prohíbe o desactiva momentáneamente la interrupción que provoque el botón de disparo especificado. Está 
relacionada con el comando 0N STRIG GOSUB. 

Formato: STRIG <<exp>) [0N/0FF/5T0P] 

Ejemplos: 10 STRIG 0N 

20 IF H THEN STRIG OFF 
50 STRIG STOP 
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Lectura del código generado por un paddle o «raqueta» cuyo número de «port» se especifica. 

Formato: [<vsr>=] PADDLE (<exp.>) 

Ejemplos: 10 X=PAODLE (1) 

20 IF PADDLE (2) > THEN GOTO 20 



MOTOR ON/OFF 

Controla ei motor de un casete de audío, activando o desactivando un relé. 

Formato : MOTOR [ON/OFF] 

Ejemplos: 10 MOTOR ON 

20 IFVAR=0TH£N MOTOR OFF 




al punto del programa en el que se pro- 
dujo la interrupción, continuando la eje- 
cución normalmente. 

Pero este tema no acaba aquí, sino 
que también se pueden controlar estas 
interrupciones programadas por medio 



de la instrucción ON STRIG GOSUB. 
Después de haber ejecutado esta ins- 
trucción , se podrá hacer que sea efecti- 
va la interrupción originada por la pul- 
sación del botón de disparo, se podrán 
anular las interrupciones, o bien se po- 




I EI PADDLE o potenciómetro continuo 
genera un valor comprendido entre 
dos límites que es leído por medio de 
la función PADDLE 



drán «congelar» temporalmente, produ- 
ciéndose la interrupción una vez que 
sean nuevamente permitidas. Con ello 
se tendrá un control total del programa, 
de forma que en ciertos momentos en 
los que no convenga que se produzca 
una interrupción, éstas sean anufadas o 
bien «memorízadas» temporalmente, 
para «acusarlas» una vez finalizada la 




■ Mediante el comando STRIG OFF se pueden inhibir o 
desactivar las interrupciones generadas por el botón de 
disparo a través de ¡a sentencia ON STRIG GOSUB. 




I El comando STRIG ON permite que se produzcan 
interrupciones mediante la pulsación 
del botón de disparo del joystick. 
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TABLA DE CONVERSION 


Ordenador 


STÍCK 


STRIG 


ON STRIG 
GOSUB 


STRING ON/ 
OFF/STOP 


PADDLE 


MOTOR 

ON/QFF 


STICK(<it>} 


STRIGKn» 


ON STRIG GOSUB 

<nl>[ <nl>] 


STRIG«n»ON/ 

OFF/STOP 


PADDLE(<n» 


MOTOR 

ON/OFF 


AMSTRAD 


- 


- 


- 


- 


- 


- 


APPLE II 

| APPLESOFT) 


- 


- 


- 


- 


PDL(<n>) 


- 


APRICOT 

(M-BASIC) 


- 


— 


- 


- 




- 


ATARI 


ST1CK(<n>) 


STRIGKn» 


- 


- 


PADDLE(<n» 


- 


CBM 64 


- 


- 


- 


- 


- 


— 


DRAGON 


JOYSTKKn» 


— 


- 


- 


- 


MOTOR ON/OFF 


EQUIPOS MSX 


STICK(<n>) 


STRIG[<n>) 


ON STRIG GOSUB<nl.>( <nl>] 


STR 1 G(< n>)0 N/0 FF/S TO P 


PDL<(<n>) 


MOTOR ON/OFF 


HP-150 


- 


— 


- 


- 




- 


IBN PC 


STICKKn» 


STRIG«n>) 


ON STRIGKn» G0SUB<nl> 


STRIG|<n»0N/0FF/ST0P 


- 


M0T0R<exp> 


MPF 


- 


— 


- 


- 


- 


- 


NCR DM-V 
(MS-BASIC) 


- 


- 


- 




- 


- 


NEW BRAIN 


- 




- 


- 


— 


- 


ORIC 


- 


- 


- 


— 


- 


- 


SHARP MZ-700 
(MZ-BASIC) 


- 


- 


- 


- 


- 


- 


SINCLAIR QL 






- 


- 


- 


- 


SPÉCTRAVIDEO 


ST!CK(<n>] 


STRIGKn» 


ON STRIG GOS U B<n 1.» . ,<n 1 >] 


STRIG|<n>)ON/OFF/STOP 




MOTOR ON/OFF 


ZX-SPECTRUM 


- ■ 


- 


- 




- 


— 



<n>; número de «port» o toma de entrada. <nl>; número de línea inicial de una subrutina. <exp>: expresión numérica 



ejecución de la zona en la que no se de- 
seaban interrupciones. Este control se 
logra con la instrucción siguiente: 

<Núm, de línea> STRIG (<exp.» 
[ON/OFF/STOP] 

Con la referida instrucción y median- 
te el número consignado en la zona 
<exp,>, se puede elegir el botón de dis- 
paro cuya detección con la instrucción 
ON STRIG GOSUB se desea activar, de- 



sactivar o memorizar. Para permitir la 
interrupción generada por un determi- 
nado botón de disparo se debe utilizar 
este comando en la forma: STRIG ( ) ON, 
con lo que al pulsar el botón afectado 
se pasará a ejecutar la subrutina cuyo 
número de línea se haya especificado 
con anterioridad en la instrucción ON 
STRIG GOSUB. 

Si lo que se quiere es desactivar esa 
interrupción, será preciso hacer uso de 
STRIG ( ) OFF; con ello, el BASIC igno- 



rará las pulsaciones del botón de dispa- 
ro destinadas a generar una interrup- 
ción. 

Al ejecutar STRIG ( ) STOP, la inte- 
rrupción no se activará al pulsar eí bo- 
tón de disparo, si bien este hecho será 
anotado internamente, y en el mismo 
momento en el que se vuelva a aciivar 
el control mediante una instrucción 
STRIG ( ) ON, la interrupción tendrá ¡j~ 
gar, aunque no se esté pulsando e bo- 
tón de disparo en ese preciso momento. 
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10 REM MANEJO DE UN JOYSTICK 
20 CLS;LET X=20:LET Y=10:LET X?=20:LET 
Y1 =10 

25 REM BORRAR POSICION ANTERIOR 
30 PRINT AI (XI, Y1);" " 

35 REM IMPRIMIR NUEVA POSICION 
40 PRINT AT (X,Y);"*" 

50 LET X1=X:LET Y1=Y 

55 REM OBTENER CODIGO DE PALANCA 

60 LET A=STICK{T) 

65 REM JOYSTICK EN REPOSO 
70 IF A=0 TREN GOTO 60 
80 REM JOYSTICK EN ACCION 
100 IF A=1 THEN LET Y=Y— 1 
110 IF A— 2 THEN LET Y=Y-1;LET X=X+1 
120 IF A=3 THEN LETX=X+1 
130 ¡F A=4 THEN LET Y=Y+1 :LET X=X+1 
140 IF A=5 THEN LETY-Y+1 
150 IFA-6THEN LET Y=Y+1:LET X=X-1 
160 IF A— 7 THEN LETX=X-1 
170 IFA-8 THEN LET Y=Y-1 :LET X=X-1 
180 REM LIMITAR POSICION EN PANTALLA 
190 IF X<2 OR X>37 THEN X=X1 
200 IF Y<2 OR Y>21 THEN Y=Y1 
210 GOTO 30 



PROGRAMA 1: Programa ejemplo ilustrativo del comportamiento de ia función STICK ( ). 
El objetivo es desplazar un asterisco a través de la pantalla bajo el control de un joystick 



Et juego del «ping-pong» 



En la ciencia informática el empleo de 
anglicismos está a la orden del día. Esto 
viene a cuento del nombre que recibe 
otro dispositivo periférico, bastante po- 
pular, conocido por "PADDLE" («raqueta 
de ping-pong»}. Despista bastante este 
nombre al ver el aspecto externo de tal 
dispositivo, el cual consta de una caja 
con un mando giratorio que mueve una 
resistencia varia ble o «potenciómetro». 
El origen del nombre se debe a que era 
empleado por el primer videojuego que 
se comercializó {el PING-PONG de ATA- 
Rl), para gobernar las raquetas que im- 
pedían que la pelota se colase por el 
fondo de la pantalla... De ahí que se 
quedara con el nombre de «raqueta». 

El paddíe es un periférico de entrada 



de datos, al igual que el joystick ; pero a 
diferencia de éste, que sólo puede en- 
tregar ocho códigos, el paddle entrega 
más de doscientos códigos diferentes. 
Ello no significa que se utilice para ele- 
gir entre todas estas opciones, sino que 
su principal uso es para controlar fenó- 
menos que varíen de forma continua en- 
tre dos valores extremos, como por 
ejemplo los comandos de sonido o la po- 
sición horizontal o vertical de una deter- 
minada figura representada en la pan- 
talla. Su funcionamiento se basa en ha- 
cer variar una tensión de forma conti- 
nua entre dos valores mediante el po- 
tenciómetro. Esta señal eléctrica es co- 
dificada en forma digital mediante un 
convertidor analógico-digital, a cuya sa- 
lida se accede mediante la función 
"PADDLE” cuyo formato es el siguiente: 

<Núm, de línea> X=PADDLE(<exp.>) 



De nuevo, se observa que este forma- 
to es igual al de las funciones STICK y 
STRIG, por lo que no es preciso volver 
a comentar aquí lo dicho anteriormente 
para esas funciones. La única diferencia 
es que la función "PADDLE” proporcio- 
na como resultado un valor comprendi- 
do, normalmente, entre O y 255, aun- 
que este rango depende como siempre 
de cada dialecto BASIC. Este valor se 
manipulará a través de alguna variable 
en la que será almacenado, o bien di- 
rectamente utilizando la función 
"PADDLE” como argumento de otra 
función, como puede observarse en el 
ejemplo que sigue a estas líneas, el cual 
simula una pantalla de «TELE-SKETCH»: 

10 SCREEN 3: REM MODO GRAFICO 
20 PSET(PADDLE(1 ) r PADDLE|2}) 

30 GOTO 10 

Control del motor 

El BASIC no sólo permite controlar 
periféricos de entrada como los vistos 
hasta ahora, también hay periféricos de 
entrada y salida o sólo salida que pue- 
den ser gobernados a través de órdenes 
en BASIC. Así, por ejemplo, puede ser 
útil en ciertos casos la posibilidad de co- 
nectar y desconectar el motor de un ca- 
sete de audio, para hacer avanzar auto- 
máticamente a la cinta hasta un punto 
determinado en el que se encuentre si- 
tuada cierta información. Para esta mi- 
sión el BASIC dispone de un comando 
de formato muy simple que permite co- 
nectar y desconectar a voluntad el mo- 
tor del casete: 

<Núm. de línea> MOTOR [ON]/[OFF] 

Si se elige la opción MOTOR ON, se 
activa un relé cuyos contactos pueden 
conmutar una pequeña corriente {de al- 
rededor de 1 50 mA), capaz de propor- 
cionar energía para el movimiento de un 
motor de casete, con fo que éste será 
operativo. Para desconectar el motor ha- 
brá que ejecutar la orden opuesta: MO- 
TOR OFF. La utilización de este coman- 
do no sólo se limita al gobierno del ca- 
sete. Puesto que los contactos destina- 
dos al control remoto dei casete están 
disponibles normalmente en algún co- 
nector externo, se pueden acoplar a él 
otros dispositivos; pero esto ya entra 
dentro del campo del bricolage electró- 
nico ajeno al fin de esta obra. 
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Impresoras 



s posible que mu- 
chos usuarios de 
ordenadores per- 
sonales no se ha- 
yan ni tan siquiera 
planteado la posibilidad de utilizar una 
impresora. Realmente, si el ordenador 
sólo se utiliza con programas de juegos 
o aplicaciones domésticas sencillas, no 
necesitará la colaboración de una de es- 
tas «máquinas de escribir inteligentes». 
No obstante, a medida que se adquiere 
una mayor experiencia en el uso del or- 
denador, se desearé obtener un mayor 
partido de sus ingentes posibilidades; 
ello conducirá a tener en cuenta el em- 
pleo de este útil periférico de salida. 

A la hora de confeccionar programas, 
la colaboración de una impresora resul- 
ta de indudable interés; con ella será 
posible guardar una copia escrita en pa- 
pel de los listados. El hecho de dispo- 
ner de copias parciales o totales del pro- 
grama durante las fases de codificación 
y depuración resulta de gran ayuda. Su 
utilidad es extensiva a la obtención de 
copias impresas de los cálculos realiza- 
dos por un determinado programa o, 
sencillamente, de los datos elaborados 
por un programa, por ejemplo, especia- 
lizado en la gestión del gasto familiar. 

Debido a Ja gran variedad de modelos 
que existen en eí mercado, la elección 
por parte del usuario de la impresora 
adecuada a sus gustos y necesidades 
debe realizarse con sumo cuidado y co- 
nocimiento de causa. Para apoyar tal 
elección, hay que conocer las caracte- 
rísticas más significativas que es preci- 
so evaluar. Pero vayamos por partes, y 
empecemos por definir someramente 
qué es una impresora. Se trata, ni más 
ni menos, de un periférico de salida que 
transforma las señales eléctricas proce- 
dentes del ordenador en una forma le- 
gible para el ser humano; más concre- 
tamente, en un documento impreso en 
papel. 

Como se desprende de esta definición, 
es el ordenador quien gobierna los mo- 
vimientos de la impresora. La interven- 
ción deJ usuario tan sólo es necesaria 
para la correcta conexión de ambas má- 
quinas, y para «dictar» al ordenador las 
instrucciones necesarias para que éste 
transfiera la información adecuada a la 
impresora. 




En los sistemas de comunicación en 
formato paralelo, los ocho bits que 
conforman un byte parten 
y se transfieren simultáneamente 
desde el dispositivo emisor. 







Si la comunicación se establece en 
formato serie , los bits son 
canalizados ordenadamente, uno tras 
otro , sobre una misma línea de 
transmisión. 



El periférico de 
escritura 

Tipos de impresora 

La principal diferencia entre los dis- 
tintos tipos de impresoras reside en la 
técnica empleada en sus cabezales de 
impresión; éste es, precisamente, el ele- 
mento que se encargará de plasmar los 
caracteres en el papel. Sus restantes 
elementos constitutivos son análogos; 
tan sóio muestran pequeñas diferencias 
en algunos aspectos tales como la for- 
ma de arrastre del papeí, mandos de 
control, circuitos electrónicos de gobier- 
no, conexiones con el exterior .. 

Son tres los tipos de impresoras más 
frecuentes en el ámbito de microorde- 
nador: las matriciales, las de margarita 
y las térmicas. La impresora matricial 
basa su funcionamiento en un juego de 
«agujas» metálicas, situadas en la cabe- 
za de impresión, que forman una cua- 
drícula (matriz) con la cual se van com- 
poniendo los diferentes caracteres. Al 
mismo tiempo que la cabeza de impre- 
sión se va desplazando por el papel, las 
señales eléctricas que envía el ordena- 
dor se encargan de activar esas agujas 
según corresponda el carácter a impri- 
mir. Las agujas golpean contra una cin- 
ta entintada, y ésta sobre el papel, di- 




Salvo el mecanismo de impresión los restañas. eventos 
suelen ser comunes a la mayoría de las ^ preseras 





El mecanismo de 
impresión se basa 
normalmente en la 
percusión de una i 
pieza metálica contra 
otra que tiene 
grabado en relieve el 
carácter a imprimir. 



tales como el tratamiento de textre 
donde se requiere una gran calidad oe 
letra. En muy pocos segundos es pes- 
ble cambiar la margarita por otra ce- 
dí stinto alfabeto de caracteres, logra- 
do así distintos tipos de impresión. 
Como principales inconvenientes 
cabe señalar que las impresoras se 
margarita son bastante más lentas 
las matriciales; por lo demás, con el las 
no es posible crear gráficos o dibujes 
pues haría falta una gran cantidad ce 
ruedas diferentes para reproducir los in- 
numerables matices de un dibujo. Qc~¿ 
desventaja es su precio, bastante nre= 
elevado que las matriciales. 

El tercer tipo de impresoras, exten: 
do en el campo de los microordenac: 
res, lo constituyen las impresoras té- 
cnicas. En ellas, los caracteres se pías 



bujando cada aguja activada un punto 
de la superficie del mismo. 

Mediante la adecuada combinación 
de estos puntos, se van creando los di- 
versos caracteres que componen el tex- 
to. Con este mismo método, es posible 
imprimir también gráficos y dibujos; ello 
supone tan sólo codificar correctamen- 
te la información que debe activar a las 
distintas agujas de la matriz. 

Las impresoras matriciales constitu- 
yen el tipo más corriente en el mundo 
de los ordenadores personales. Entre 




| Las impresoras de chorro de tinta 
| proyectan sobre el papel gotas de 
tinta en la proporción adecuada para 
■¿pintar» literalmente el carácter . 



sus ventajas cabe citar una buena velo- 
cidad de impresión y una moderada eco- 
nomía; sin lugar a dudas, su sistema de 
impresión resulta sencillo en compara- 
ción con el de ¡os restantes tipos de im- 
presoras. Aunque también cabe hablar 
de inconvenientes; por ejemplo: son 
bastante ru idosas y su cal ¡dad de i repre- 
sión suele ser reducida, debido a que las 
letras y números están formados por 
una conjunción de puntos estampados 
en el papeL 

Cuando es necesario obtener copias 
de gran calidad y con una buena pre- 
sentación, suele recurrirse a las impre- 
soras de rueda de margarita; así llama- 
das por utilizar como mecanismo de im- 
presión una rueda con pétalos, cuya for- 
ma recuerda a la mencionada flor, en 
cuyos extremos se encuentran situados 
los diferentes caracteres imprimibles. 

El «modus operando de este tipo de 
impresoras consiste en el giro de la rue- 
da de la margarita y la actuación sincro- 
nizada de un «martillo» metálico; éste 
golpea en cada caso al «pétalo» que 
transporta el carácter cuyo código co- 
rresponde con las señales eléctricas re- 
cibidas del ordenador. Et martillo golpea 
entonces contra el pétalo, la cinta y el 
papel, dejando huella impresa del ca- 
rácter en cuestión. 

La calidad de impresión que se obtie- 
ne con este tipo de impresoras es com- 
parable al de las mejores máquinas de 
escribir. Esta es su principal virtud, que 
la hace muy adecuada para aplicaciones 




Las impresoras de margarita deber 
su nombre a la similitud que prese' z 
el elemento de impresión con dicha 
flor. El dispositivo consiste en una 
rueda en cuyos # pétalos » están 
situados los caracteres que es capaz 
de representar 



man por efecto deí calor. Este es tras- 
pasado desde una cabeza de impresíor 
especial, formada por resistencias elé:- 
tricas que se calientan al recibir una se- 
ñal, a un papel sensible al calor, que se 
oscurece bajo su influencia. Este méto- 
do de impresión cuenta con ia ventad 
de ser muy silencioso, además de bas- 
tante rápido y razonablemente económ 
co, A estas ventajas se opone la neee- 
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sidad de un papel especial, más caro 
que el normal, y la baja calidad de la im- 
presión. 

Existen otros muchos tipos de impre- 
soras; si bien, tos mencionados en las lí- 
neas anteriores son los más populares 
y accesibles para el usuario medio de un 
ordenador personal. Entre los restantes 
modelos, cabe citar aquí a las impreso- 
ras de chorro de tinta, que van «pintan- 
do» literalmente los caracteres por me- 
dio de gotas de tinta, lanzadas desde la 
cabeza de impresión y dirigidas median- 
te campos electromagnéticos. También 
hay que hacer mención a las impreso- 
ras de líneas, que escriben «línea a lí- 
nea» en lugar de carácter a carácter, con 
lo que consiguen una mayor rapidez de 
impresión; y a ías de láser, que ponen 
en práctica sofisticadas técnicas que 
conducen a un resultado muy veloz y de 
alta calidad. 



La impresora desde el BASIC 

Las impresoras, al igual que los orde- 
nadores, son máquinas incapaces por sí 
mismas de realizar alguna acción. De la 
misma manera que al ordenador hay 
que adiestrarle por medio de un progra- 
ma, a la impresora también hay que in- 
dicarle las tareas que se desea que rea- 
lice; pero en este caso es el mismo pro- 
grama y, por lo tanto, el propio ordena- 
dor el que sirve de intermediario entre 
el usuario y la impresora. Las órdenes 
que determinarán el funcionamiento de 
la impresora adoptarán la forma de co- 
mandos BASIC. 

¿Cómo se puede obtener una copia 
impresa del listado del programa? Como 
ya se sabe, el listado del programa se 
puede visualizar en pantalla o monitor 
medíante el comando LIST. En buena ló- 
gica, la orden adecuada para extraer el 
listado por impresora no debería diferir 
mucho de ésta; y así es en realidad. Para 
tal fin se emplea este mismo comando, 
aunque con ciertas variantes. 

En efecto, es preciso indicar al orde- 
nador, de una u otra forma, a través de 
qué dispositivo periférico de salida (pan- 
talla, impresora...} se desea la emisión 
del listado del programa. Como quiera 
que, generalmente, esto se realiza por 
pantalla, sí tan sólo se formula la orden 
LIST, el ordenador asumirá el que el lis- 




tado debe visualizarse por pantalla. Para 
hacerlo a través de la impresora, será 
preciso indicar este hecho mediante el 
código correspondiente a este dispositi- 
vo que, generalmente, es la letra P (del 
inglés PRIIMTER: impresora) encerrada 
entre comillas. Así, el comando que en 
muchos dialectos BASIC permite obte- 
ner un listado por impresora presenta el 
siguiente formato; 

<nl> LIST "P'M<nl1>— < nl2>J 

En el que la expresión <nl.> indica el 
número de la primera línea del progra- 
ma a partir de la cual se desea obtener 
en listado, y <nl2.> precisa la última lí- 
nea a listar. 

Por ejemplo, si en la memoria de! or- 
denador se encuentra el siguiente pro- 
grama; 

10 REM EJEMPLO DE LISTADO 
20 CLS 

30 PRINT "PULSA UNA TECLA" 

40 IF !NKEY$="" THEN GOTO 40 
50 PR1NT "ESA TECLA NO VALE" 

60 GOTO 30 

A! ejecutar la orden LIST "P“ se ob- 
tendrá un listado del programa comple- 
to por impresora; mientra que si la or- 
den introducida es LIST "P' r , 20-50, el 
resultado en la impresora será el si- 
guiente; 

20 CLS 

30 PRINT "PULSA UNA TECLA" 

40 IF1NKEY$=”"THEN GOTO 40 
50 PRINT ISA TECLA NO VALE" 



Así, pues, si el programa es extenso y 
se está alimentando a la impresora me- 
díante hojas sueltas, se podré hacer un 
cálculo del número de líneas de progra- 
ma que caben en una hoja y, de esta for- 
ma, fraccionar el listado en varias ho- 
jas. De no hacerlo así, lo más normal es 
que al llegar al final del papel la impre- 
sora siga listando el programa con lo 
que, al poder avanzar el pape!, el resul- 
tado sería un inmenso borrón indesci- 
frable en la última línea impresa. 




La formación de los caracteres en las 
¡ impresoras matricíales tiene lugar por 
medio de una serie de puntos. Estos 
son estampados sobre el papel con 
unos minúsculos martillos { las 
agujas) que presionan a la cinta 
i entintada sobre el papel al ser 
activados por señales procedentes 
8 r del ordenador 
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Obtiene un listado del programa por impresora; permite especificar los números de líneas a imprimir. 

Formato: LIST '?" <nl1>-<nl2> 

Ejemplos: 10 LIST'? 4 ' 

20 LIST'?' 4 , 10—1120 
30 LIST T' -100 




Las impresoras de matriz de puntos suelen constituir una alternativa muy frecuente 
para el usuario de un ordenador de tipo doméstico o persona!. Su precio 
moderado y su aceptable calidad abogan por tal elección 



Por ejemplo, otro de los comandos 
frecuentes para el mismo cometido 
LLIST, cuyo formato y funcionamier:; 
coinciden con lo indicado en el caso ar- 
te rior, En otros traductores BASIC, 
necesario «abrir» un canal de comunica- 
ción entre el ordenador y la impresora 
y debiendo indicar este hecho a cona- 
nuación del comando LIST, por medio da 
un número de identificación del cana 
previamente abierto. Este último caso sí 
discribirá ampliamente en capítulos su- 
cesivos. 

Una vez que se establezca la corres- 
pondiente comunicación entre ordena- 
dor e impresora, puede ocurrir que e 
primer listado que se obtenga sea desa- 
troso: con la presencia de líneas er 
blanco entre cada dos líneas del progra 
ma, o sin que se produzca ningún avar 
ce del papel, con lo que el resultan: 
será una preciosa línea del color negr: 
más oscuro que contiene, ella sola, tod: 
el listado del programa. Esto puede se - 
debido a la diferencia existente entre los 
caracteres de «retorno de carro» y úe 
asalto de línea» que le son enviados a la 
impresora por el ordenador. En efectc 
el ordenador enviará un retorno de ce 
rro aí final de cada línea de texto que 
hará retroceder la cabeza de impresicr 
al comienzo de la línea y, tras ello, mar 
dará un carácter de salto de línea quí 
hará avanzar el papel. 

El carácter de salto de línea es gene- 



La indicación de tos números de línea 
inicial y final también hace posible ob- 
tener listados de sólo algunos trozos in- 
teresantes deJ programa, como subruti- 
nas de uso general o algún segmento 
especial del mismo. 

El lenguaje BASIC no está demasiado 
estandarizado en este aspecto. Son mu- 
chos los intérpretes BASIC que no acep- 
tan el referido comando, siendo necesa- 
rio el uso de otros comandos alternati- 
vos. 



Algunos fabricantes ofrecen para sus 
equipos una alternativa que combina 
la función de impresora con la de 
pfotter o trazador gráfico. Este tipo de 
periféricos de escritura dibuja los 
caracteres y las líneas del trazado por 
medio de « plumas » o bolígrafos de 
diversos colores 
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rado automáticamente por e! ordenador, 
o por la misma impresora, con lo que en 
el caso de concurrir ambos o ninguno 
de los dos, pueden llegar a producirse 
los desastrosos resultados descritos. La 
solución estriba en una lectura cuida- 
dosa de los manuales de usuario, tanto 
de la impresora como del ordenador en 
cada caso específico. 

Una vez que ya sabe obtener listados 
por impresora, el usuario estará ansio- 
sos de conocer la forma de imprimir los 
mensajes que desee o los resultados de 
sus propios programas. Pues bien, la 
forma de lograrlo es tan sencilla como 
la utilizada para los listados. Como ya 
se adivina, guarda una estrecha relación 
con los comandos adecuados para orde- 
nar esa misma función sobre la panta- 
lla del TV. 

Mientras que para imprimir caracte- 
res sobre la pantalla se utiliza el coman- 
do PRINT, para que la salida se produz- 
ca por la impresora el comando indica- 
do suele ser LPRINT, cuyo formato más 
general es el siguiente: 

<ní> LPRINT <exp_> 

La expresión <exp.> puede ser una 
cadena de caracteres, una variable, un 
número directamente o una expresión 
cuyo resultado se calcula e imprime en 
papel. Así, por ejemplo, las siguientes 
líneas: 

10 LPRINT 'KOLA ' 

20 LET N - 1 234 
30 LPRINT ”N= P :N 
40 LPRINT 
50 LPRINT 5678 
60 LPRINT 4*6 
70 END 



harán que la impresora escriba el texto 
que sigue: 

HOLA 

14=1234 

5673 

24 

Como se puede observar er a nea 
30 del ejemplo anterior es posible uti- 
lizar los separadores ópteos oe a sen- 
tencia PRINT, como son a coma . el 




Imprime el contenido de variables, datos literales o expresiones en general. 

Formato: LPRINT <e*p.>{i;][,I<exp.>l 

Ejemplos: 10 LPRINT NUM; 

20 LPRINT ''ADIOS' 1 
30 LPRINT 5 * 3 




Composición típica de caracteres creados 
por una impresora matridal de 7x5 puntos. 




En la fotografía aparece la impresora tmageWnter de ¡a firma A:: e —~ 
impresora de matriz de puntos facultada para la impresión de rr j* : e 
alfabetos (fuentes) de caracteres. 




Lista valores por impresora, permitiendo la tabulación en columnas. 

Formato: LPRINT AT x,y; <exp> 

Ejemplos: 10 LPRINT AT 0,0; "HOLA" 

20 LPRINT AT 10.0; ''ADIOS" 



IOCLS 

20 PRINT "TALONARIO DE CHEQUES" 

30 PRINT 

40 DIM N0MBRE$(20),PESETAS$(50),FECHA$(20),MES$( 15) 

50 INPUT "CANTIDAD EN NUMERO”;C 
60 INPUT “ DEST I N AT AR 1 0“ ; NOMBRES 
70 INPUT "CANTIDAD EN LETRA";FECHA$ 

80 INPUT "FECHA EN LETRA”;FECHA$ 

90 INPUT "MES“;M£S$ 

100 INPUT" DE 198";YEAR 
1 1 0 LET YEAR-YEAR+ 1 980 
120 LPRINT " 

";CHR$(I5);"PTA *”;C;" ptS. # ";CHR$( 1 4) 

130 LPRINT 

1 40 LPRINT CHR$( 1 5);” Pagúese a NOMBRES 

150 LPRINT "Pesetas ";PE5ETAS$ 

1 60 LPRI NT CHR$( 1 4);" ";CHR$( ! 5);FECHA$;" 

de ";MES$;" de “;YEAR;CHR$( 14) 

I80F0R 1 = 1 TO 51PRINT :NEXT I 



Listado del programa 'Talonarios de cheques 



punto y coma. Ambos producirán los re- 
sultados ya conocidos, aunque, en este 
caso, sobre ía hoja de papel. 

La orden LPRINT, sin más, produce en 
la impresora una línea completamente 
en blanco, ya que en este caso el orde- 
nador únicamente envía al referido pe- 
riférico los caracteres de retorno de ca- 
rro y de salto de línea. Por otro lado, es 
posible utilizar en la mayoría de los ca- 
sos las características de tabulación 
propias del comando PRINT AT x,y r Aun- 



que con la salvedad que sólo funciona- 
rá el posicionamiento de la cabeza de 
impresión en la columna indicada, y no 
será posible su colocación en otra línea 
del papel distinta a la actual; ello se 
debe a que, en general, las impresoras 
no cuentan con mecanismos para el re- 
troceso del papel. 

Veamos un nuevo programa a título 
de ejemplo. Su cometido es escribir 
aleatoriamente los signos de una ima- 
ginaria quiniela futbolística. 



10 LPRINT ''QUINIELA r ':LPRINT 
20 F0R 1=1 TO 14 
30 LET A=INT(RND(0j*1GO] 

40 IF A<50THEN LPRINT "1" 

50 IF A>15 AND A<=45 THEN LPRINT X 
60 IFA015THEN LPRINT Jf T 
70 NEXT I 

Partiendo de unas determinadas pro- 
babilidades {en porcentaje) y de un nc- 
mero aleatorio, entre 0 y 100, generado 
por el ordenador, se van obteniendo les 
diferentes signos 1, X ó 2. Signos que 
aparecerán impresos en e! papel en su 
correspondiente columna; un posible 
resultado es el que aparece a continua- 
ción: 

QUINIELA 

1 

1 

1 

X 

1 

2 

X 

1 

I 

X 

X 

1 

2 

2 

Queda a la atención del lector la po- 
sible —y muy sencilla — modificación de 
este programa para que sea capaz de es- 
cribir sobre un boleto original de apues- 
tas en lugar de sobre una hoja de papel 
convencional. 



Caracteres de control 

Dentro del repertorio de caracteres 
del código ASCII, empleado normalmen- 
te por la gran mayoría de ordenadores 
para la representación interna de los ca- 
racteres, existen una serie de códigos 
dedicados exclusivamente al control de 
diversos periféricos y otros menesteres; 
códigos que no plasman un resultado 
escrito ni sobre la pantalla ni sobre el 
papel. Los referidos códigos se utilizan 
con distinto objetivo en los diversos mo- 
delos de impresoras, aunque siempre 
para activar sus posibles «efectos espe- 
ciales» de impresión. 
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* 

10 REM PROG 




1 20 PRINT "A" 


mW 

t# * 


: 30 INPUT A 


• 

* 

•# * 


• 40 LET A a A+t 


• / • 

*a * 


: 50 GOTO 10 


H * 

»/ * I 


i &<* pama 


/ *1 
i? * / 

_ ^ j * I 



vo vi * 

T: m eo TÓ 600 ; j 
r* <Jg0LETJ‘J*1 :/ 
’ J 90 m/MJ ;7 

Ajd/djm //I • / 



LIST "P" 



I £/ comando LIST «P» permite obtener 
listados de programas a través de la 
impresora en un soporte permanente 
de papel. 

Los caracteres de control serán envia- 
dos a la impresora, desde el ordenador, 
de diferentes formas. Los métodos más 
comunes consisten en utilizar la función 
CHR$[) como argumento de un coman- 



LISTT'j 30-50 



10 REM EJEMPLO 
20 INPUT A 




30 LET A=A+1 
40IFA 10THEN20 
50 PR1NT A 




60 PRINT A + 2 



Recurriendo a la opción de tndtcar 
los números de línea detrás del 
comando LIST T\ es posible obtener 
listados parciales de programa. 





TABLA DE CONVERSION 




Ordenador 


LLIST 


LPRINT 




LLIST [<n1>-<n2>l 


LPRINT <exp.> 


AMSTRAD 


LIST[<n1>-<n2>],#8 


PRINT #8,<exp> 


APPLE II 






(APPLESOFT) 






APRICOT 

(M-BASIC) 


LLIST [<n1>-< n2>] 


LPRINT <exp> 


ATARI 


LIST ”P".l<n 1 >-<n2>] 


LPRINT <exp.> 


CBM64 


- 


- 


DRAGON 


LLIST I<n1>-<n2>] 


PRINT#-2<exp. > 


EQUIPOS MSX 


LLIST [<n1>-<n2>] 


LPRINT <exp.> 


HP-150 


LLIST [<n1>-<n2>] 


LPRINT <exp> 


IBM PC 


LLIST [<n1>-<n2>] 


LPRINT <exp.> 


MPF 


— 


- 


NCR DM-V 
(MS-BASICj 


LLIST (<n1>-< n2>] 


LPRINT <exp.> 


NEW BRAIN 


- 


- 


ORIC 


LLIST (<n1 >-<n2>] 


LPRINT <exp> 


SHARP MZ-700 
(MZ BASIC) 


LIST/P [<n1 >-< n2>l 


PRINT/P <ex*p> 


SINCLAIR QL 


- 


- 


SPECTRAVIDEO 


LLIST [<n1>-<n2>] 


LPRINT <exp.> 


ZX-SPECTRUM 


LLIST [<n1>-<n2>] 


LPRINT <exp> 



do LPRINT, o bien mediante la genera- 
ción de algún carácter alternativo pul- 
sando la tecla CONTROL o ESCAPE y 
otra simultáneamente. 

Entre los «efectos especiales» que se 
pueden conseguir en la mayoría de las 
impresoras comerciales, cabe mencio- 
nar los siguientes: espaciado proporcio- 
nal, que consiste en asignar menor es- 
pacio en el papel a los caracteres más 
estrechos como la «i» y más espacio a 
los más anchos como la «w»; selección 
del tipo de letra, en las impresoras ma- 
t riciales entre tipos tales como eíite, 
pica, elite alargada, pica condensada, 
cursiva, cursiva enfatizada, etc.; doble 
percusión del martillo, que imprime dos 



veces susperpuestas un mismo carác- 
ter, logrando una mejor calidad de letra; 
activación y desactivación del subraya- 
do del texto a escribir; selección de cier- 
tos caracteres especiales, como la «eñe» 
española o los signos de diéresis o 
acentos; modificación de los patrones de 
caracteres de las impresoras matriciales 
para así poder crear gráficos y diagra- 
mas ... 

Debido a la casi nula estandarización 
de los caracteres de control empleados 
por las impresoras, es imposible relatar 
aquí la función de los mismos. Mientras 
en un modelo, el código 24 se emplea, 
por ejemplo, para activar el subrayado, 
en otro modelo puede no producir efec- 
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TREINTA de MAYO de 1985 



Un posible resultado impreso derivado de le ejecución 
del programa « talonario de cheques». 



Medios de comunicación 

Los dispositivos periféricos que rodean a! ordenador y 
permiten su comunicación con el mundo exterior, exigen 
la presencia de un medio especializado en el diálogo de 
entrada o salida, medio que debe facilitar el trasvase de 
las órdenes de trabajo y de la propia información. 

Los dispositivos que permiten establecer tal 
comunicación obedecen al apelativo genérico de 
«interfaces». Esta palabra engloba tanto a los circuitos 
electrónicos como al software que lo gobierna. 
Internamente, los ordenadores poseen los denominados 
*buses» r formados por varios conductores en paralelo 
que transportan información binaria. Dicha información 
corresponde a los datos en proceso, a ordenes de 
control y a direcciones de memoria. Mediante estas 
señales, la CPU «sabe» cuándo debe enviar cierta 
información a un periférico o recibirla de éste, y también 
conoce si un periférico determinado se encuentra 
disponible o no. El conocimiento de estas situaciones se 
obtiene en base al adecuado intercambio de señales de 
control; tal intercambio se canaliza a través de los 
interfaces que unen al ordenador con los periféricos, y 
respetando un determinado protocolo de comunicación 
previamente establecido. Normalmente, la comunicación 
entre el ordenador y la mayoría de los periféricos se 
establece en el llamado formato paralelo»; a través de 
un conjunto de cables cada uno de los cuales transporta 
una señal binaria. Por extensión, los interfaces en los 
que se apoya este tipo de comunicación se denominan 
«interfaces en paralelo», y realizan el trasvase de 
información byte a byte, El tipo de ínterface más 
conocido y utilizado en el terreno de la comunicación ' 
con impresoras en formato paralelo es el llamado 
«CENTRONICS»; en razón a la firma que la creó. 



Es indudable que además de las líneas de datos son 
necesarias toda una serie de señales de control. En el 
caso del interface CENTRONICS, las señales presentes 
en el co necio r de comunicación son las siguientes: 

ADK: disposición para aceptar datos. 

GND; masa de referencia o «tierra» para el ordenador y 
periférico. 

STfíOBE: señal del ordenador al periférico que revela 
que la información está ya preparada para ser leída. 
BUSY: señal de periférico ocupado. 

DO a D7: ocho líneas de bit para la transferencia de los 
datos. 

Aunque este tipo de interface es el más utilizado para la 
comunicación con impresoras, la estandarización deí 
mismo no es perfecta. 

Es fácil tropezarse con multitud de conectares diferentes 




Coneclor estándar correspondiente a 
un sistema de comunicación en 
formato serie según la norma 
RS/232C. En el gráfico se indica el 
cometido de los terminales más 
relevantes. 



to alguno, o bien desencadenar una ac- 
ción completamente distinta. 

Para generalizar la cuestión, en ef s 
guíente ejemplo (ver cuadro adjunto), 
cuya misión es editar cheques impresos 
se presupone que el carácter CHR$flc 
activa el efecto de subrayado mientras 
que CHR$P 4) lo desactiva. Ambos cód - 
gos deben ser modificados en función 
del modelo de impresora que se utilice 
Un posible resultado de su ejecución 
es el que aparece en el cuadra adjunte 
Tomando como punto de partida el re- 
ferido programa, el lector puede pract - 
car el manejo de su impresora y acor 
dicionar el programa para que sea capa: 
de rellenar cheques auténticos. Aur 
que, desde luego, la firma siempre debe 
partir del propio puño y letra del titular 
de la cuenta. 



que pretenden realizar el mismo tipo de unión, si bien, 
el problema no pasa generalmente de encontrar el 
cable adecuado a cada caso. Cuando fos dispositivos a 
conectar se encuentran a considerable distancia física y 
su bus de datos incluye un gran número de señales, la 
conexión en paralelo no es recomendable En tal caso 
se opta por la comunicación en «formato serie». En la 
comunicación en «serie», se van enviando por un único 
cable, y uno detrás de otro, los bits que constituyen la 
información a lansmitir. Aunque no se den las 
condiciones de lejanía ames indicadas, es muy 
frecuente encontrar ordenadores que disponen de 
-interfaces de lipo serie» para la comunicación con los 
dispositivos periféricos. 

El tipo de interface serie más frecuente es el que 
responde a las siglas RS/232. Su definición a nivel 
teórico está bastante estandarizada por lo que respecta 
a los niveles de las señales eléctricas y a la asignación 
de los terminales de conexión. Se suele utilizar un 
conector «miniatura D» de 25 contactos, de los cuales el 
número 2 se emplea para transmitir fos datos deí 
ordenador al periférico, el número 3 para recibir los 
datos procedentes del periférico y el número 7 como 
masa de referencia o común de ambas señales. 

Los dispositivos de transmisión y de recepción deben ser 
escrupulosamente ajustados en cuanto a velocidad de 
transmisión y al formato de la información enviada para 
que la transferencia se produzca correctamente. 

Además de los dos citados, existen otros muchos tipos 
de interfaces; si bien, suelen ser específicos de un 
determinado modelo o gama de ordenadores. 
Generalmente, éstos sólo permiten la transmisión de 
datos en un sentido, tal es el caso de Jos interfaces para 
joystick, para monitores de televisión, para entradas 
analógicas con fines de medición, para el control del 
motor de un magnetófono a casetes... 
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